Rev 3444 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3434 | leency | 1 | //Leency 2008-2013 |
2 | |||
3 | char *captions[] = { |
||
4 | "Open", "Enter", |
||
3439 | leency | 5 | "Open with...", "CrlEnt", |
3434 | leency | 6 | "View as text", "F3", |
7 | "View as HEX", "F4", |
||
8 | "Rename", "F2", |
||
9 | "Delete", "Del", |
||
3440 | leency | 10 | //"Refresh", "F5", |
3434 | leency | 11 | 0}; |
12 | |||
13 | void FileMenu() |
||
14 | { |
||
15 | proc_info MenuForm; |
||
3439 | leency | 16 | mouse mm; |
3434 | leency | 17 | word id, key, slot; |
3439 | leency | 18 | int ccount=0, cur, newi, linew=10, lineh=18, texty; |
3434 | leency | 19 | for (i=0; captions[i]!=0; i+=2) |
20 | { |
||
21 | ccount++; |
||
22 | if (strlen(captions[i])>linew) linew = strlen(captions[i]); |
||
23 | } |
||
3439 | leency | 24 | linew = linew + 3 * 6 + 50; |
3434 | leency | 25 | texty = lineh/2-4; |
26 | SetEventMask(100111b); |
||
27 | |||
28 | goto _MENU_DRAW; |
||
29 | loop() switch(WaitEvent()) |
||
30 | { |
||
31 | case evMouse: |
||
32 | slot = GetProcessSlot(MenuForm.ID); |
||
33 | if (slot != GetActiveProcess()) ExitProcess(); |
||
3439 | leency | 34 | mm.get(); |
35 | newi = mm.y - 1 / lineh; |
||
3440 | leency | 36 | if (mm.y<=0) || (mm.y>ccount*lineh+5) || (mm.x<0) || (mm.x>linew) newi=-1; |
3439 | leency | 37 | if (cur<>newi) |
38 | { |
||
39 | cur=newi; |
||
40 | goto _ITEMS_DRAW; |
||
41 | } |
||
3434 | leency | 42 | break; |
43 | |||
44 | case evButton: |
||
45 | id=GetButtonID(); |
||
46 | if (id==100) Open(); |
||
47 | if (id==101) notify("Not compleated yet"); |
||
3444 | leency | 48 | if (id==102) FnProcess(3); |
49 | if (id==103) FnProcess(4); |
||
50 | if (id==104) FnProcess(2); |
||
3434 | leency | 51 | if (id==105) Del_Form(); |
3444 | leency | 52 | if (id==106) FnProcess(5); |
3458 | leency | 53 | SwitchToAnotherThread(); |
3434 | leency | 54 | ExitProcess(); |
55 | break; |
||
56 | |||
57 | case evKey: |
||
58 | IF (GetKey()==27) ExitProcess(); |
||
59 | break; |
||
60 | |||
61 | case evReDraw: _MENU_DRAW: |
||
3444 | leency | 62 | DefineAndDrawWindow(m.x+Form.left+5,m.y+Form.top+GetSkinHeight(),linew+3,ccount*lineh+6,0x01, 0, 0, 0x01fffFFF); |
3434 | leency | 63 | GetProcessInfo(#MenuForm, SelfInfo); |
64 | /* _PutImage(1,23, 16,44, #factions); //иконки */ |
||
3439 | leency | 65 | DrawRectangle(0,0,linew+1,ccount*lineh+2,col_border); |
66 | DrawBar(1,1,linew,1,0xFFFfff); |
||
3444 | leency | 67 | PutShadow(linew+2,1,1,ccount*lineh+2,0,2); |
68 | PutShadow(linew+3,2,1,ccount*lineh+2,0,1); |
||
69 | PutShadow(1,ccount*lineh+3,linew+2,1,0,2); |
||
70 | PutShadow(2,ccount*lineh+4,linew+1,1,0,1); |
||
3434 | leency | 71 | |
3439 | leency | 72 | _ITEMS_DRAW: |
3434 | leency | 73 | for (i=0; captions[i*2]!=0; i++) |
74 | { |
||
3439 | leency | 75 | DefineButton(1,i*lineh+1,linew,lineh-1,i+100+BT_HIDE+BT_NOFRAME,0xFFFFFF); |
76 | DrawBar(1,i*lineh+2,1,lineh,0xFFFfff); |
||
77 | if (i==cur) DrawBar(2,i*lineh+2,linew-1,lineh,0xFFFfff); else DrawBar(2,i*lineh+2,linew-1,lineh,col_work); |
||
78 | WriteText(7,i*lineh+texty+2,0x80,0x000000,captions[i*2]); |
||
79 | WriteText(-strlen(captions[i*2+1])*6-6+linew,i*lineh+texty+2,0x80,0x999999,captions[i*2+1]); |
||
3434 | leency | 80 | } |
81 | } |
||
82 | }>0)>=0)> |