Subversion Repositories Kolibri OS

Rev

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

  1. #define MEMSIZE 4096*40
  2.  
  3. #include "../lib/gui.h"
  4. #include "../lib/fs.h"
  5.  
  6. void main()
  7. {
  8.         proc_info Form;
  9.  
  10.         @SetEventMask(EVM_REDRAW + EVM_KEY + EVM_BUTTON + EVM_MOUSE);
  11.         loop() switch(WaitEvent())
  12.         {
  13.                 case evMouse:                  
  14.                         mouse.get();
  15.                         break;
  16.  
  17.                 case evKey:
  18.                         @GetKeyScancode();
  19.                         if (AL == SCAN_CODE_ESC) @ExitProcess();
  20.                         break;
  21.  
  22.                 case evReDraw:
  23.                         sc.get();
  24.                         DefineAndDrawWindow(100, 100, 300, 250, 0x34, sc.work, "Template app", 0);
  25.                         GetProcessInfo(#Form, SelfInfo);
  26.         }
  27. }
  28.