forked from KolibriOS/kolibrios
Eolite v1.98.7: you can only run one window "About Eolite"
git-svn-id: svn://kolibrios.org@4040 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
53cca077c5
commit
bde6d41e51
@ -76,8 +76,8 @@
|
|||||||
|
|
||||||
enum {ONLY_SHOW, WITH_REDRAW, ONLY_OPEN}; //OpenDir
|
enum {ONLY_SHOW, WITH_REDRAW, ONLY_OPEN}; //OpenDir
|
||||||
|
|
||||||
#define TITLE "Eolite File Manager v1.98.6"
|
#define TITLE "Eolite File Manager v1.98.7"
|
||||||
#define ABOUT_TITLE "Eolite v1.98.6"
|
#define ABOUT_TITLE "Eolite v1.98.7"
|
||||||
dword col_work = 0xE4DFE1;
|
dword col_work = 0xE4DFE1;
|
||||||
dword col_border = 0x9098B0; //A0A0B8; //0x819FC5;
|
dword col_border = 0x9098B0; //A0A0B8; //0x819FC5;
|
||||||
dword col_padding = 0xC8C9C9;
|
dword col_padding = 0xC8C9C9;
|
||||||
@ -88,6 +88,8 @@ int toolbar_buttons_x[7]={9,46,85,134,167,203};
|
|||||||
char tmp_disk_del_param[3]="d0";
|
char tmp_disk_del_param[3]="d0";
|
||||||
struct path_string { char Item[4096]; };
|
struct path_string { char Item[4096]; };
|
||||||
|
|
||||||
|
int active_about=0;
|
||||||
|
|
||||||
llist files;
|
llist files;
|
||||||
|
|
||||||
byte
|
byte
|
||||||
|
@ -24,16 +24,26 @@
|
|||||||
void about_dialog()
|
void about_dialog()
|
||||||
{
|
{
|
||||||
byte id;
|
byte id;
|
||||||
|
IF (active_about) ExitProcess();
|
||||||
|
active_about=1;
|
||||||
loop() switch(WaitEvent())
|
loop() switch(WaitEvent())
|
||||||
{
|
{
|
||||||
case evButton:
|
case evButton:
|
||||||
id=GetButtonID();
|
id=GetButtonID();
|
||||||
IF (id==1) || (id==10) ExitProcess();
|
IF (id==1) || (id==10)
|
||||||
|
{
|
||||||
|
active_about=0;
|
||||||
|
ExitProcess();
|
||||||
|
}
|
||||||
IF (id==23) RunProgram(BROWSER_PATH, BROWSER_LINK);
|
IF (id==23) RunProgram(BROWSER_PATH, BROWSER_LINK);
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case evKey:
|
case evKey:
|
||||||
IF (GetKey()==27) ExitProcess();
|
IF (GetKey()==27)
|
||||||
|
{
|
||||||
|
active_about=0;
|
||||||
|
ExitProcess();
|
||||||
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case evReDraw:
|
case evReDraw:
|
||||||
|
Loading…
Reference in New Issue
Block a user