Subversion Repositories Kolibri OS

Rev

Rev 6008 | Rev 6191 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6008 Rev 6050
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 
#ifdef LANG_RUS
 6 
#ifdef LANG_RUS
7 
	?define DEVELOPERS_TEXT " §à ¡®â稪¨:\nLeency Veliant PunkJoker Pavelyakov\nKolibriOS Team\n2008-2016"
 7 
	?define DEVELOPERS_TEXT " §à ¡®â稪¨:\nLeency Veliant PunkJoker Pavelyakov\nKolibriOS Team\n2008-2016"
8 
	?define CLOSE_BUTTON_TEXT "‡ ªàëâì"
 8 
	?define CLOSE_BUTTON_TEXT "‡ ªàëâì"
9 
#else
 9 
#else
10 
	?define DEVELOPERS_TEXT "Developers:\nLeency Veliant PunkJoker Pavelyakov\nKolibriOS Team\n2008-2016"
 10 
	?define DEVELOPERS_TEXT "Developers:\nLeency Veliant PunkJoker Pavelyakov\nKolibriOS Team\n2008-2016"
11 
	?define CLOSE_BUTTON_TEXT "Close"
 11 
	?define CLOSE_BUTTON_TEXT "Close"
12 
#endif
 12 
#endif
13 
 
 13 
 
14 
void about_dialog()
 14 
void about_dialog()
15 
{
15 
{
16 
	byte id;
 16 
	byte id;
17 
	proc_info about_form;
 17 
	proc_info about_form;
18 
 
 18 
 
19 
	if (active_about) {cmd_free=2;ExitProcess();} else active_about=1;
 19 
	if (active_about) {cmd_free=2;ExitProcess();} else active_about=1;
20 
	loop() switch(WaitEvent())
 20 
	loop() switch(WaitEvent())
21 
	{
 21 
	{
22 
		case evButton:
22 
		case evButton:
23 
				id=GetButtonID();
 23 
				id=GetButtonID();
24 
				IF (id==1) || (id==10)
24 
				IF (id==1) || (id==10)
25 
				{
 25 
				{
26 
					active_about=0;
 26 
					active_about=0;
27 
					cmd_free = 2;
 27 
					cmd_free = 2;
28 
					ExitProcess();
 28 
					ExitProcess();
29 
				}
 29 
				}
30 
				IF (id==11) RunProgram(BROWSER_PATH, BROWSER_LINK);
 30 
				IF (id==11) RunProgram(BROWSER_PATH, BROWSER_LINK);
31 
				break;
 31 
				break;
32
32
33 
		case evKey:
 33 
		case evKey:
34 
				IF (GetKey()==27)
 34 
				IF (GetKey()==27)
35 
				{
 35 
				{
36 
					active_about=0;
 36 
					active_about=0;
37 
					cmd_free = 2;
 37 
					cmd_free = 2;
38 
					ExitProcess();
 38 
					ExitProcess();
39 
				}
 39 
				}
40 
				break;
 40 
				break;
41
41
42 
		case evReDraw:
 42 
		case evReDraw:
43 
				DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,440,200+GetSkinHeight(),0x34,system.color.work,0);
 43 
				DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,440,200+GetSkinHeight(),0x34,system.color.work,0);
44 
				GetProcessInfo(#about_form, SelfInfo);
 44 
				GetProcessInfo(#about_form, SelfInfo);
45 
				if (Form.status_window>2) break;
 45 
				if (about_form.status_window>2) break;
46 
				_PutImage(10, 15, 86, 86, #logo);
 46 
				_PutImage(10, 23, 86, 86, #logo);
- 
 
 47 
				WriteTextB(112,16,0x82,0xD49CD2,ABOUT_TITLE);
47 
				WriteTextB(110,15,0x81,0xBF40BF,ABOUT_TITLE);
 48 
				WriteTextB(110,14,0x82,0xBF40BF,ABOUT_TITLE);
48 
				WriteTextLines(110,53,10010000b,0,DEVELOPERS_TEXT,21);
 49 
				WriteTextLines(110,53,10010000b,0,DEVELOPERS_TEXT,21);
49 
				#ifdef LANG_RUS
 50 
				#ifdef LANG_RUS
50 
				DrawFlatButton(about_form.cwidth-310,about_form.cheight-38,180,26,11,0xE4DFE1,"ˆáâ®à¨ï ࠧࠡ®âª¨");
 51 
				DrawFlatButton(about_form.cwidth-310,about_form.cheight-38,180,26,11,"ˆáâ®à¨ï ࠧࠡ®âª¨");
51 
				#endif
 52 
				#endif
52 
				DrawFlatButton(about_form.cwidth-110,about_form.cheight-38, 90,26,10,0xE4DFE1,CLOSE_BUTTON_TEXT);
 53 
				DrawFlatButton(about_form.cwidth-110,about_form.cheight-38, 90,26,10,CLOSE_BUTTON_TEXT);
53 
	}
 54 
	}
54 
}
 55 
}