Subversion Repositories Kolibri OS

Rev

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

Rev 6930 Rev 7051
Line 23... Line 23...
23
				}
23
				}
24
				IF (id==11) RunProgram(BROWSER_PATH, BROWSER_LINK);
24
				IF (id==11) RunProgram(BROWSER_PATH, BROWSER_LINK);
25
				break;
25
				break;
Line 26... Line 26...
26
				
26
				
27
		case evKey:
27
		case evKey:
-
 
28
				GetKeys();
28
				IF (GetKey()==27)
29
				IF (key_scancode == SCAN_CODE_ESC)
29
				{
30
				{
30
					active_about=0;
31
					active_about=0;
31
					cmd_free = 2;
32
					cmd_free = 2;
32
					ExitProcess();
33
					ExitProcess();
33
				}
34
				}
Line 34... Line 35...
34
				break;
35
				break;
35
				
36
				
36
		case evReDraw:
37
		case evReDraw:
37
				DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,310,300+GetSkinHeight(),0x34,system.color.work,NULL,0);
38
				DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,310,300+skin_height,0x34,system.color.work,NULL,0);
38
				GetProcessInfo(#about_form, SelfInfo);
39
				GetProcessInfo(#about_form, SelfInfo);
39
				if (about_form.status_window>2) break;
40
				if (about_form.status_window>2) break;
40
				logo_pal[0] = system.color.work;
41
				logo_pal[0] = system.color.work;