Subversion Repositories Kolibri OS

Rev

Rev 5640 | Blame | Last modification | View Log | Download | RSS feed

  1. #define MEMSIZE 0x3E80
  2.  
  3. #include "../lib/io.h"
  4.  
  5. void main()
  6. {  
  7.         int id, key, i;
  8.         dword file;
  9.         mem_Init();
  10.         io.dir_buffer("/sys/",DIR_ONLYREAL);
  11.         loop()
  12.    {
  13.       switch(WaitEvent())
  14.       {
  15.          case evButton:
  16.             id=GetButtonID();              
  17.             if (id==1) ExitProcess();
  18.                         break;
  19.      
  20.         case evKey:
  21.                         key = GetKey();
  22.                         if (key==013){ //Enter
  23.                                 draw_window();
  24.                                 WriteText(50,90,0x80,0xFF00FF,io.dir_position(i));
  25.                                 if(i<io.dir.count)i++;
  26.                         }
  27.                         break;
  28.          
  29.          case evReDraw:
  30.                         draw_window();
  31.                         break;
  32.       }
  33.    }
  34. }
  35. void draw_window()
  36. {
  37.         proc_info Form;
  38.         DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header");
  39.         GetProcessInfo(#Form, SelfInfo);
  40.         WriteText(10,110,0x80,0,#param);
  41. }
  42.  
  43. stop:
  44.