Subversion Repositories Kolibri OS

Rev

Rev 6782 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
6041 leency 1
 
2
 
3
	dword appear_x, appear_y, text, identifier, selected;
4
	llist list;
5
	void show();
6
	char stak[4096];
7
}menu;
8
9
void _menu::show(dword _appear_x, _appear_y, _menu_width, _text, _identifier)
10
 
11
	appear_x = _appear_x;
12
	appear_y = _appear_y;
13
	text = _text;
14
	identifier = _identifier;
15
16
	list.cur_y = -1;
17
 
18
	list.count = chrnum(text, '\n')+1;
19
	list.SetSizes(2,2,_menu_width,list.count*19,19);
20
21
	CreateThread(#_menu_thread,#stak+4092);
22
 
23
24
void _menu_thread()
25
 
26
	proc_info MenuForm;
27
	SetEventMask(100111b);
28
	loop() switch(WaitEvent())
29
	{
30
		case evMouse:
31
			GetProcessInfo(#MenuForm, SelfInfo);
32
			if (!CheckActiveProcess(MenuForm.ID)) _menu_no_item_click();
33
			mouse.get();
34
			if (menu.list.ProcessMouse(mouse.x, mouse.y)) _menu_draw_list();
35
			if (mouse.lkm)&&(mouse.up) _menu_item_click();
36
			break;
37
		case evKey:
38
			GetKeys();
39
			if (key_scancode==SCAN_CODE_ESC) _menu_no_item_click();
40
			if (key_scancode==SCAN_CODE_ENTER) _menu_item_click();
41
			if (menu.list.ProcessKey(key_scancode)) _menu_draw_list();
42
			break;
43
		case evReDraw:
44
			DefineAndDrawWindow(menu.appear_x,menu.appear_y,menu.list.w+2,menu.list.h+4,0x01, 0, 0, 0x01fffFFF);
45
			DrawPopup(0,0,menu.list.w,menu.list.h+3,0, 0xE4DFE1,0x9098B0);
46
			_menu_draw_list();
47
	}
48
}
49
50
void _menu_draw_list()
51
 
52
	int N, bgcol;
53
	for (N=0; N
54
	{
55
		if (N==menu.list.cur_y) bgcol=0xFFFfff; else bgcol=0xE4DFE1;
56
		DrawBar(menu.list.x, N*menu.list.item_h+menu.list.y, menu.list.w-3, menu.list.item_h, bgcol);
57
	}
58
	WriteTextLines(13, menu.list.item_h-8/2+menu.list.y, 0x80, 0, menu.text, menu.list.item_h);
59
	if (menu.selected) WriteText(5, menu.selected-1*menu.list.item_h+7, 0x80, 0xEE0000, "\x10");
60
}
61
62
void _menu_item_click()
63
 
64
	menu.list.cur_y = menu.identifier + menu.list.cur_y;
65
	ExitProcess();
66
}
67
68
void _menu_no_item_click()
69
 
70
	menu.list.cur_y = 0;
71
	ExitProcess();
72
}
73