Subversion Repositories Kolibri OS

Rev

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

Rev 5674 Rev 5702
Line 48... Line 48...
48
llist menu;
48
llist menu;
49
int cur_action_buf;
49
int cur_action_buf;
Line 50... Line 50...
50
 
50
 
51
void FileMenu()
51
void FileMenu()
52
{
52
{
53
	word key;
53
	word key,key2;
54
	proc_info MenuForm;
54
	proc_info MenuForm;
Line 55... Line 55...
55
	int index;
55
	int index;
56
 
56
 
Line 76... Line 76...
76
				else if (mouse.move)&&(menu.ProcessMouse(mouse.x, mouse.y)) MenuListRedraw();
76
				else if (mouse.move)&&(menu.ProcessMouse(mouse.x, mouse.y)) MenuListRedraw();
77
				else if (mouse.key&MOUSE_LEFT)&&(mouse.up) {action_buf = cur_action_buf; cmd_free=1; ExitProcess(); }
77
				else if (mouse.key&MOUSE_LEFT)&&(mouse.up) {action_buf = cur_action_buf; cmd_free=1; ExitProcess(); }
78
		break;
78
		break;
Line 79... Line 79...
79
				
79
				
80
		case evKey:
80
		case evKey:
-
 
81
				GetFullKey();
-
 
82
				key = AH;
-
 
83
				$shr  eax,16
81
				key = GetKey();
84
				key2 = AL;
82
				if (key==27){cmd_free=1;ExitProcess();}
85
				if (key2==SCAN_CODE_ESC){cmd_free=1;ExitProcess();}
83
				else if (key == 13) {action_buf = cur_action_buf; cmd_free=1; ExitProcess(); }
86
				else if (key2 == SCAN_CODE_ENTER) {action_buf = cur_action_buf; cmd_free=1; ExitProcess(); }
84
				if (menu.ProcessKey(key)) MenuListRedraw();
87
				if (menu.ProcessKey(key2)) MenuListRedraw();
Line 85... Line 88...
85
				break;
88
				break;
86
				
89
				
87
		case evReDraw: _MENU_DRAW:
90
		case evReDraw: _MENU_DRAW: