Subversion Repositories Kolibri OS

Rev

Rev 6041 | Rev 6782 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6041 Rev 6746
Line 57... Line 57...
57
	 
57
	 
58
	 case evReDraw:
58
	 case evReDraw:
59
		if (menu.list.cur_y) {
59
		if (menu.list.cur_y) {
60
			if (menu.list.cur_y > butv.id) && (menu.list.cur_y < buta.id) category = menu.list.cur_y - butv.id;
60
			if (menu.list.cur_y > butv.id) && (menu.list.cur_y < buta.id) category = menu.list.cur_y - butv.id;
61
		}
61
		}
62
		DefineAndDrawWindow(215,100,350,300,0x34,0xFFFFFF,"Window header");
62
		DefineAndDrawWindow(215,100,350,300,0x34,0xFFFFFF,"Window header",0);
63
		GetProcessInfo(#Form, SelfInfo);
63
		GetProcessInfo(#Form, SelfInfo);
64
		WriteText(10,110,0x80,0,#param);
64
		WriteText(10,110,0x80,0,#param);
65
		DrawCaptButton(butv.x, butv.y, butv.w, butv.h, butv.id, 0xCCCccc, 0x000000, "Vegetables");
65
		DrawCaptButton(butv.x, butv.y, butv.w, butv.h, butv.id, 0xCCCccc, 0x000000, "Vegetables");
66
		DrawCaptButton(buta.x, buta.y, buta.w, buta.h, buta.id, 0xCCCccc, 0x000000, "Aminal");
66
		DrawCaptButton(buta.x, buta.y, buta.w, buta.h, buta.id, 0xCCCccc, 0x000000, "Aminal");