Subversion Repositories Kolibri OS

Rev

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

Rev 3933 Rev 4040
Line 22... Line 22...
22
#endif
22
#endif
Line 23... Line 23...
23
 
23
 
24
void about_dialog()
24
void about_dialog()
25
{   
25
{   
-
 
26
	byte id;
-
 
27
	IF (active_about) ExitProcess();
26
	byte id;
28
	active_about=1;
27
	loop() switch(WaitEvent())
29
	loop() switch(WaitEvent())
28
	{
30
	{
29
		case evButton: 
31
		case evButton: 
30
				id=GetButtonID();
32
				id=GetButtonID();
-
 
33
				IF (id==1) || (id==10) 
-
 
34
				{
-
 
35
					active_about=0;
-
 
36
					ExitProcess();
31
				IF (id==1) || (id==10) ExitProcess();
37
				}
32
				IF (id==23) RunProgram(BROWSER_PATH, BROWSER_LINK);
38
				IF (id==23) RunProgram(BROWSER_PATH, BROWSER_LINK);
Line 33... Line 39...
33
				break;
39
				break;
34
				
40
				
-
 
41
		case evKey:
-
 
42
				IF (GetKey()==27)
-
 
43
				{
-
 
44
					active_about=0;
35
		case evKey:
45
					ExitProcess();
Line 36... Line 46...
36
				IF (GetKey()==27) ExitProcess();
46
				}
37
				break;
47
				break;
38
				
48