Subversion Repositories Kolibri OS

Rev

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

Rev 3440 Rev 3444
Line 43... Line 43...
43
 
43
 
44
		case evButton: 
44
		case evButton: 
45
				id=GetButtonID();
45
				id=GetButtonID();
46
				if (id==100) Open();
46
				if (id==100) Open();
47
				if (id==101) notify("Not compleated yet");
47
				if (id==101) notify("Not compleated yet");
48
				if (id==102) ActionsProcess(3);
48
				if (id==102) FnProcess(3);
49
				if (id==103) ActionsProcess(4);
49
				if (id==103) FnProcess(4);
50
				if (id==104) ActionsProcess(2);
50
				if (id==104) FnProcess(2);
51
				if (id==105) Del_Form();
51
				if (id==105) Del_Form();
52
				if (id==106) ActionsProcess(5);
52
				if (id==106) FnProcess(5);
53
				ExitProcess();
53
				ExitProcess();
Line 54... Line 54...
54
				break;
54
				break;
55
				
55
				
56
		case evKey:
56
		case evKey:
Line 57... Line 57...
57
				IF (GetKey()==27) ExitProcess();
57
				IF (GetKey()==27) ExitProcess();
58
				break;
58
				break;
59
				
59
				
60
		case evReDraw: _MENU_DRAW:
60
		case evReDraw: _MENU_DRAW:
61
				DefineAndDrawWindow(m.x+Form.left+5,m.y+Form.top+GetSkinHeight(),linew+2,ccount*lineh+5,0x01, 0, 0, 0x01fffFFF);
61
				DefineAndDrawWindow(m.x+Form.left+5,m.y+Form.top+GetSkinHeight(),linew+3,ccount*lineh+6,0x01, 0, 0, 0x01fffFFF);
62
				GetProcessInfo(#MenuForm, SelfInfo);
62
				GetProcessInfo(#MenuForm, SelfInfo);
63
				/* _PutImage(1,23, 16,44, #factions); //èêîíêè	*/
63
				/* _PutImage(1,23, 16,44, #factions); //èêîíêè	*/
-
 
64
				DrawRectangle(0,0,linew+1,ccount*lineh+2,col_border);
64
				DrawRectangle(0,0,linew+1,ccount*lineh+2,col_border);
65
				DrawBar(1,1,linew,1,0xFFFfff);
-
 
66
				PutShadow(linew+2,1,1,ccount*lineh+2,0,2);
Line 65... Line 67...
65
				DrawBar(1,1,linew,1,0xFFFfff);
67
				PutShadow(linew+3,2,1,ccount*lineh+2,0,1);
66
				PutShadow(linew+2,1,1,ccount*lineh+2,0,1);
68
				PutShadow(1,ccount*lineh+3,linew+2,1,0,2);
67
				PutShadow(1,ccount*lineh+3,linew+2,1,0,1);
69
				PutShadow(2,ccount*lineh+4,linew+1,1,0,1);
68
 
70