Subversion Repositories Kolibri OS

Rev

Rev 2764 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2764 leency 1
//Leency - 2012
2
 
3
#define ITEM_HEIGHT 18
4
#define ITEM_WIDTH  138
5
 
6
char *ITEMS_LIST[]={
2793 leency 7
"View in Tinypad   F3",
8
"View in TextEdit  F4",
2764 leency 9
"--------------------", //сделать определение таких линий и рисовать их
10
"KOI-8         Ctrl+K",
11
"UTF           Ctrl+U",
12
0};
13
 
14
proc_info MenuForm;
15
 
16
 
17
void menu_rmb()
18
{
19
 
20
	mouse mm;
2793 leency 21
	int items_num, items_cur;
22
	byte id, key;
2764 leency 23
 
24
	SetEventMask(100111b);
25
 
26
	loop() switch(CheckEvent())
27
	{
28
		case evMouse:
2793 leency 29
				mm.get();
30
				id=mm.y/ITEM_HEIGHT;
31
				if (id<0) || (id+1>items_num) break;
32
				if (items_cur<>id)
33
				{
34
					items_cur=id;
35
					goto _ITEMS_DRAW;
36
				}
37
 
2764 leency 38
				break;
39
 
40
		case evButton:
41
				id=GetButtonID();
42
				if (id==1) ExitProcess();
2793 leency 43
				_BUTTON_MARK:
2764 leency 44
				if (id==10) WB1.Scan(52); //View html code
2793 leency 45
				if (id==11) WB1.Scan(53); //View html code
46
				if (id==12) break;
47
				if (id==13) WB1.Scan(11); //KOI
48
				if (id==14) WB1.Scan(21); //UTF
2764 leency 49
 
50
				ExitProcess();
51
				break;
52
 
53
		case evKey:
2793 leency 54
				key = GetKey();
55
				if (key==27) ExitProcess();
56
				if (key==178) && (items_cur)
57
				{
58
					items_cur--;
59
					goto _ITEMS_DRAW;
60
				}
61
				if (key==177) && (items_cur+1
62
				{
63
					items_cur++;
64
					goto _ITEMS_DRAW;
65
				}
66
				if (key==13)
67
				{
68
					id=items_cur+10;
69
					//WriteDebug(IntToStr(id));
70
					goto _BUTTON_MARK;
71
				}
2764 leency 72
				break;
73
 
74
		case evReDraw:
75
				for (items_num=0; ITEMS_LIST[items_num]<>0; items_num++;) {};
2793 leency 76
				DefineAndDrawWindow(Form.left+m.x,Form.top+m.y+GetSkinWidth()+3,ITEM_WIDTH,items_num*ITEM_HEIGHT+1,0x01,0x10FFFFFF,0,0,0);
2764 leency 77
 
2793 leency 78
				DrawRegion(0,0,ITEM_WIDTH,items_num*ITEM_HEIGHT+1,0x777777); //ободок
79
				_ITEMS_DRAW:
2764 leency 80
				for (i=0; i
81
				{
82
					DefineButton(0, i*ITEM_HEIGHT, ITEM_WIDTH, ITEM_HEIGHT, i+10+BT_HIDE, 0xFFFFFF);
2793 leency 83
					if (i<>items_cur) EDX=0xFFFFFF; else EDX=0x94AECE;
84
					DrawBar(1, i*ITEM_HEIGHT+1, ITEM_WIDTH-1, ITEM_HEIGHT, EDX);
2764 leency 85
					WriteText(8,i*ITEM_HEIGHT+6,0x80,0x000000,ITEMS_LIST[i],0);
86
				}
87
		default:
88
				GetProcessInfo(#MenuForm, SelfInfo);
89
				id=GetSlot(MenuForm.ID);
90
				if (id<>ActiveProcess()) ExitProcess();
91
	}
92
}