Subversion Repositories Kolibri OS

Rev

Rev 7606 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. #define BROWSER_PATH    "/sys/network/webview"
  2. #define BROWSER_LINK    "http://kolibri-n.org/inf/eolite/eolite_p1"
  3.  
  4.  
  5. void about_dialog()
  6. {  
  7.         int id;
  8.         proc_info about_form;
  9.         int about_x;
  10.  
  11.         if (active_about) {cmd_free=2;ExitProcess();} else active_about=1;
  12.         loop() switch(WaitEvent())
  13.         {
  14.                 case evButton:
  15.                                 id=GetButtonID();
  16.                                 IF (id==1)
  17.                                 {
  18.                                         active_about=0;
  19.                                         cmd_free = 2;
  20.                                         ExitProcess();
  21.                                 }
  22.                                 IF (id==11) RunProgram(BROWSER_PATH, BROWSER_LINK);
  23.                                 break;
  24.                                
  25.                 case evKey:
  26.                                 GetKeys();
  27.                                 IF (key_scancode == SCAN_CODE_ESC)
  28.                                 {
  29.                                         active_about=0;
  30.                                         cmd_free = 2;
  31.                                         ExitProcess();
  32.                                 }
  33.                                 break;
  34.                                
  35.                 case evReDraw:
  36.                                 DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,300,300+skin_height,0x34,sc.work,T_ABOUT,0);
  37.                                 GetProcessInfo(#about_form, SelfInfo);
  38.                                 if (about_form.status_window>2) break;
  39.                                 logo_pal[0] = sc.work;
  40.                                 ESDWORD[#logo_pal+16] = sc.work_dark;
  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;
  43.                                 WriteTextB(about_x+2,107,0x82,0xD49CD2,ABOUT_TITLE);
  44.                                 WriteTextB(about_x,105,0x82,0x9D129D,ABOUT_TITLE);
  45.                                 DrawRectangle3D(0,154,about_form.cwidth,1,sc.work_dark,sc.work_light);
  46.                                 WriteTextLines(7,163,0x90,sc.work_text,"KolibriOS File Manager\nAuthors: Leency, Veliant\nPunk_Joker, Pavelyakov\n2008 - 2019",20);
  47.                                 #ifdef LANG_RUS
  48.                                 DrawStandartCaptButton(60,about_form.cheight-38,11,"История разработки");
  49.                                 #endif
  50.         }
  51. }
  52.