Rev 3848 | 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 | |||
3848 | punk_joker | 3 | #ifdef LANG_RUS |
3434 | leency | 4 | char *captions[] = { |
3848 | punk_joker | 5 | "Открыть", "Enter", |
6 | "Открыть с помощью...", "CrlEnt", |
||
7 | "Открыть как текст", "F3", |
||
3877 | leency | 8 | "Открыть как HEX", "F4", |
3848 | punk_joker | 9 | // |
10 | "Копировать", "Crl+C", |
||
11 | "Вырезать", "Crl+X", |
||
12 | "Вставить", "Crl+V", |
||
13 | "Переименовать", "F2", |
||
14 | "Удалить", "Del", |
||
15 | "Обновить", "F5", |
||
16 | 0, 0}; |
||
17 | |||
18 | #else |
||
19 | char *captions[] = { |
||
3434 | leency | 20 | "Open", "Enter", |
3439 | leency | 21 | "Open with...", "CrlEnt", |
3434 | leency | 22 | "View as text", "F3", |
23 | "View as HEX", "F4", |
||
3695 | leency | 24 | // |
25 | "Copy", "Crl+C", |
||
26 | "Cut", "Crl+X", |
||
27 | "Paste", "Crl+V", |
||
3434 | leency | 28 | "Rename", "F2", |
29 | "Delete", "Del", |
||
3848 | punk_joker | 30 | "Refresh", "F5", |
3695 | leency | 31 | 0, 0}; |
3848 | punk_joker | 32 | #endif |
3434 | leency | 33 | |
3695 | leency | 34 | proc_info MenuForm; |
35 | |||
3434 | leency | 36 | void FileMenu() |
37 | { |
||
3439 | leency | 38 | mouse mm; |
3695 | leency | 39 | word id, key, slot, index; |
3439 | leency | 40 | int ccount=0, cur, newi, linew=10, lineh=18, texty; |
3695 | leency | 41 | for (index=0; captions[index]!=0; index+=2) |
3434 | leency | 42 | { |
43 | ccount++; |
||
3695 | leency | 44 | if (strlen(captions[index])>linew) linew = strlen(captions[index]); |
3434 | leency | 45 | } |
3439 | leency | 46 | linew = linew + 3 * 6 + 50; |
3434 | leency | 47 | texty = lineh/2-4; |
48 | SetEventMask(100111b); |
||
49 | |||
50 | goto _MENU_DRAW; |
||
51 | loop() switch(WaitEvent()) |
||
52 | { |
||
53 | case evMouse: |
||
54 | slot = GetProcessSlot(MenuForm.ID); |
||
55 | if (slot != GetActiveProcess()) ExitProcess(); |
||
3439 | leency | 56 | mm.get(); |
57 | newi = mm.y - 1 / lineh; |
||
3440 | leency | 58 | if (mm.y<=0) || (mm.y>ccount*lineh+5) || (mm.x<0) || (mm.x>linew) newi=-1; |
3439 | leency | 59 | if (cur<>newi) |
60 | { |
||
61 | cur=newi; |
||
62 | goto _ITEMS_DRAW; |
||
63 | } |
||
3434 | leency | 64 | break; |
65 | |||
66 | case evButton: |
||
67 | id=GetButtonID(); |
||
68 | if (id==100) Open(); |
||
69 | if (id==101) notify("Not compleated yet"); |
||
3695 | leency | 70 | if (id==102) FnProcess(3); //F3 |
71 | if (id==103) FnProcess(4); //F4 |
||
72 | if (id==104) Copy(#file_path, NOCUT); |
||
73 | if (id==105) Copy(#file_path, CUT); |
||
74 | if (id==106) CreateThread(#Paste,#copy_stak); |
||
75 | if (id==107) FnProcess(2); |
||
76 | if (id==108) Del_Form(); |
||
77 | if (id==109) FnProcess(5); |
||
3434 | leency | 78 | ExitProcess(); |
79 | break; |
||
80 | |||
81 | case evKey: |
||
82 | IF (GetKey()==27) ExitProcess(); |
||
83 | break; |
||
84 | |||
85 | case evReDraw: _MENU_DRAW: |
||
3444 | leency | 86 | DefineAndDrawWindow(m.x+Form.left+5,m.y+Form.top+GetSkinHeight(),linew+3,ccount*lineh+6,0x01, 0, 0, 0x01fffFFF); |
3434 | leency | 87 | GetProcessInfo(#MenuForm, SelfInfo); |
3439 | leency | 88 | DrawRectangle(0,0,linew+1,ccount*lineh+2,col_border); |
89 | DrawBar(1,1,linew,1,0xFFFfff); |
||
3444 | leency | 90 | PutShadow(linew+2,1,1,ccount*lineh+2,0,2); |
91 | PutShadow(linew+3,2,1,ccount*lineh+2,0,1); |
||
92 | PutShadow(1,ccount*lineh+3,linew+2,1,0,2); |
||
93 | PutShadow(2,ccount*lineh+4,linew+1,1,0,1); |
||
3434 | leency | 94 | |
3439 | leency | 95 | _ITEMS_DRAW: |
3695 | leency | 96 | for (index=0; captions[index*2]!=0; index++) |
3434 | leency | 97 | { |
3695 | leency | 98 | DefineButton(1,index*lineh+1,linew,lineh-1,index+100+BT_HIDE+BT_NOFRAME,0xFFFFFF); |
99 | DrawBar(1,index*lineh+2,1,lineh,0xFFFfff); |
||
100 | if (index==cur) |
||
101 | { |
||
102 | DrawBar(2,index*lineh+2,linew-1,lineh,0xFFFfff); |
||
103 | } |
||
104 | else |
||
105 | { |
||
106 | DrawBar(2,index*lineh+2,linew-1,lineh,col_work); |
||
107 | WriteText(8,index*lineh+texty+3,0x80,0xf2f2f2,captions[index*2]); |
||
108 | } |
||
109 | WriteText(7,index*lineh+texty+2,0x80,0x000000,captions[index*2]); |
||
110 | WriteText(-strlen(captions[index*2+1])*6-6+linew,index*lineh+texty+2,0x80,0x888888,captions[index*2+1]); |
||
3434 | leency | 111 | } |
112 | } |
||
113 | }>0)>=0)> |