Subversion Repositories Kolibri OS

Rev

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

Rev 3439 Rev 3440
Line 5... Line 5...
5
	"Open with...",  "CrlEnt",
5
	"Open with...",  "CrlEnt",
6
	"View as text",  "F3",
6
	"View as text",  "F3",
7
	"View as HEX",   "F4",
7
	"View as HEX",   "F4",
8
	"Rename",        "F2",
8
	"Rename",        "F2",
9
	"Delete",        "Del",
9
	"Delete",        "Del",
-
 
10
	//"Refresh",       "F5",
10
	0};
11
	0};
Line 11... Line 12...
11
 
12
 
12
void FileMenu()
13
void FileMenu()
13
{
14
{
Line 30... Line 31...
30
		case evMouse:
31
		case evMouse:
31
				slot = GetProcessSlot(MenuForm.ID);
32
				slot = GetProcessSlot(MenuForm.ID);
32
				if (slot != GetActiveProcess()) ExitProcess();
33
				if (slot != GetActiveProcess()) ExitProcess();
33
				mm.get();
34
				mm.get();
34
				newi = mm.y - 1 / lineh;
35
				newi = mm.y - 1 / lineh;
35
				//if (m.y<0) || (newi+1>items_num) || (m.x<0) || (m.x>ITEM_WIDTH) break;
36
				if (mm.y<=0) || (mm.y>ccount*lineh+5) || (mm.x<0) || (mm.x>linew) newi=-1;
36
				if (cur<>newi)
37
				if (cur<>newi)
37
				{
38
				{
38
					cur=newi;
39
					cur=newi;
39
					goto _ITEMS_DRAW;
40
					goto _ITEMS_DRAW;
40
				}
41
				}
Line 46... Line 47...
46
				if (id==101) notify("Not compleated yet");
47
				if (id==101) notify("Not compleated yet");
47
				if (id==102) ActionsProcess(3);
48
				if (id==102) ActionsProcess(3);
48
				if (id==103) ActionsProcess(4);
49
				if (id==103) ActionsProcess(4);
49
				if (id==104) ActionsProcess(2);
50
				if (id==104) ActionsProcess(2);
50
				if (id==105) Del_Form();
51
				if (id==105) Del_Form();
-
 
52
				if (id==106) ActionsProcess(5);
51
				ExitProcess();
53
				ExitProcess();
52
				break;
54
				break;
Line 53... Line 55...
53
				
55
				
54
		case evKey:
56
		case evKey: