Subversion Repositories Kolibri OS

Rev

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

Rev 5768 Rev 5811
Line 19... Line 19...
19
llist menu;
19
llist menu;
Line 20... Line 20...
20
 
20
 
21
void menu_rmb()
21
void menu_rmb()
22
{
22
{
23
	proc_info MenuForm;
-
 
Line 24... Line 23...
24
	int key;
23
	proc_info MenuForm;
25
 
24
 
26
	menu.ClearList();
25
	menu.ClearList();
27
	while (ITEMS_LIST[menu.count]) menu.count++;
26
	while (ITEMS_LIST[menu.count]) menu.count++;
Line 32... Line 31...
32
	switch(WaitEvent())
31
	switch(WaitEvent())
33
	{
32
	{
34
	case evMouse:
33
	case evMouse:
35
				GetProcessInfo(#MenuForm, SelfInfo);
34
		GetProcessInfo(#MenuForm, SelfInfo);
36
				if (!CheckActiveProcess(MenuForm.ID)) ExitProcess();
35
		if (!CheckActiveProcess(MenuForm.ID)) ExitProcess();
37
 
-
 
38
				mouse.get();
36
		mouse.get();
39
				if (menu.ProcessMouse(mouse.x, mouse.y)) DrawMenuList();
37
		if (menu.ProcessMouse(mouse.x, mouse.y)) DrawMenuList();
40
				if (mouse.lkm)&&(mouse.up) ItemClick();
38
		if (mouse.lkm)&&(mouse.up) ItemClick();
41
				break;
39
		break;
Line 42... Line 40...
42
				
40
				
43
		case evKey:
41
	case evKey:
44
				key = GetKey();
42
		GetKeys();
45
				if (key==27) ExitProcess();
43
		if (key_scancode==SCAN_CODE_ESC) ExitProcess();
46
				if (key==13) ItemClick();
44
		if (key_scancode==SCAN_CODE_ENTER) ItemClick();
47
				if (menu.ProcessKey(key)) DrawMenuList();
45
		if (menu.ProcessKey(key_scancode)) DrawMenuList();
Line 48... Line 46...
48
				break;
46
		break;
49
				
47
				
50
		case evReDraw:
48
	case evReDraw: