Subversion Repositories Kolibri OS

Rev

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

Rev 7782 Rev 8020
Line 42... Line 42...
42 
	 case evButton:
 42 
	 case evButton:
43 
		id=GetButtonID();
43 
		id=GetButtonID();
44 
		if (id==1) ExitProcess();
 44 
		if (id==1) ExitProcess();
45 
		if (id==butv.id) {
 45 
		if (id==butv.id) {
46 
			menu_id = butv.id;
 46 
			menu_id = butv.id;
47 
			open_lmenu(Form.left+3 + butv.x, Form.top+skin_height + butv.y + butv.h,
47 
			open_lmenu(butv.x, butv.y + butv.h, MENU_TOP_LEFT,
48 
				MENU_ALIGN_TOP_LEFT, current_veg, #vegetables);
 48 
				current_veg, #vegetables);
49 
		}
 49 
		}
50 
		if (id==buta.id) {
 50 
		if (id==buta.id) {
51 
			menu_id = buta.id;
 51 
			menu_id = buta.id;
52 
			open_lmenu(Form.left+5 + buta.x + buta.w, Form.top+skin_height + buta.y + buta.h,
52 
			open_lmenu(buta.x + buta.w, buta.y + buta.h,
53 
				MENU_ALIGN_TOP_RIGHT, current_animal, #animals);
 53 
				MENU_TOP_RIGHT, current_animal, #animals);
54 
		}
 54 
		}
55 
		break;
 55 
		break;
Line 56... Line 56...
56 
 
 56 
 
57 
	case evKey:
 57 
	case evKey: