Subversion Repositories Kolibri OS

Rev

Rev 6300 | Rev 6746 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6300 Rev 6678
1
//Leency 2008-2016
1
//Leency 2008-2016
2
 
2
 
3
#define BROWSER_PATH    "/sys/network/webview"
3
#define BROWSER_PATH    "/sys/network/webview"
4
#define BROWSER_LINK    "http://kolibri-n.org/inf/eolite/eolite_p1"
4
#define BROWSER_LINK    "http://kolibri-n.org/inf/eolite/eolite_p1"
5
 
5
 
6
 
6
 
7
void about_dialog()
7
void about_dialog()
8
{   
8
{   
9
	byte id;
9
	byte id;
10
	proc_info about_form;
10
	proc_info about_form;
11
	int about_x;
11
	int about_x;
12
 
12
 
13
	if (active_about) {cmd_free=2;ExitProcess();} else active_about=1;
13
	if (active_about) {cmd_free=2;ExitProcess();} else active_about=1;
14
	loop() switch(WaitEvent())
14
	loop() switch(WaitEvent())
15
	{
15
	{
16
		case evButton: 
16
		case evButton: 
17
				id=GetButtonID();
17
				id=GetButtonID();
18
				IF (id==1)
18
				IF (id==1)
19
				{
19
				{
20
					active_about=0;
20
					active_about=0;
21
					cmd_free = 2;
21
					cmd_free = 2;
22
					ExitProcess();
22
					ExitProcess();
23
				}
23
				}
24
				IF (id==11) RunProgram(BROWSER_PATH, BROWSER_LINK);
24
				IF (id==11) RunProgram(BROWSER_PATH, BROWSER_LINK);
25
				break;
25
				break;
26
				
26
				
27
		case evKey:
27
		case evKey:
28
				IF (GetKey()==27)
28
				IF (GetKey()==27)
29
				{
29
				{
30
					active_about=0;
30
					active_about=0;
31
					cmd_free = 2;
31
					cmd_free = 2;
32
					ExitProcess();
32
					ExitProcess();
33
				}
33
				}
34
				break;
34
				break;
35
				
35
				
36
		case evReDraw:
36
		case evReDraw:
37
				DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,310,300+GetSkinHeight(),0x34,system.color.work,NULL);
37
				DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,310,300+GetSkinHeight(),0x34,system.color.work,NULL);
38
				GetProcessInfo(#about_form, SelfInfo);
38
				GetProcessInfo(#about_form, SelfInfo);
39
				if (about_form.status_window>2) break;
39
				if (about_form.status_window>2) break;
40
				logo_pal[0] = system.color.work;
40
				logo_pal[0] = system.color.work;
41
				PutPaletteImage(#logo,86,86,about_form.cwidth-86/2,10,8,#logo_pal);
41
				PutPaletteImage(#logo,86,86,about_form.cwidth-86/2,10,8,#logo_pal);
42
				about_x = -strlen(ABOUT_TITLE)*18+about_form.cwidth/2;
42
				about_x = -strlen(ABOUT_TITLE)*18+about_form.cwidth/2;
43
				WriteTextB(about_x+2,107,0x82,0xD49CD2,ABOUT_TITLE);
43
				WriteTextB(about_x+2,107,0x82,0xD49CD2,ABOUT_TITLE);
44
				WriteTextB(about_x,105,0x82,0x9D129D,ABOUT_TITLE);
44
				WriteTextB(about_x,105,0x82,0x9D129D,ABOUT_TITLE);
45
				DrawRectangle3D(0,154,about_form.cwidth,1,system.color.work_dark,system.color.work_light);
45
				DrawRectangle3D(0,154,about_form.cwidth,1,system.color.work_dark,system.color.work_light);
46
				WriteTextLines(7,163,0x90,system.color.work_text,"KolibriOS File Manager\nAuthors: Leency, Veliant\nPunk_Joker, Pavelyakov\n(c) 2008 - 2016",20);
46
				WriteTextLines(7,163,0x90,system.color.work_text,"KolibriOS File Manager\nAuthors: Leency, Veliant\nPunk_Joker, Pavelyakov\n(c) 2008 - 2016",20);
47
				#ifdef LANG_RUS
47
				#ifdef LANG_RUS
48
				DrawFlatButton(about_form.cwidth-180/2,about_form.cheight-38,180,26,11,"ˆáâ®à¨ï ࠧࠡ®âª¨");
48
				DrawFlatButton(60,about_form.cheight-38,11,"ˆáâ®à¨ï ࠧࠡ®âª¨");
49
				#endif
49
				#endif
50
	}
50
	}
51
}
51
}