Subversion Repositories Kolibri OS

Rev

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

Rev 5641 Rev 5646
Line 5... Line 5...
5 
void main()
 5 
void main()
6 
{
6 
{
7 
	int id, key, i;
 7 
	int id, key, i;
8 
	dword file;
 8 
	dword file;
9 
	mem_Init();
 9 
	mem_Init();
10 
	io.dir_buffer("/sys/",DIR_ONLYREAL);
 10 
	io.dir_buffer("",DIR_ONLYREAL);
11 
	loop()
 11 
	loop()
12 
   {
 12 
   {
13 
      switch(WaitEvent())
 13 
      switch(WaitEvent())
14 
      {
 14 
      {
15 
         case evButton:
 15 
         case evButton:
Line 19... Line 19...
19
19
20 
        case evKey:
 20 
        case evKey:
21 
			key = GetKey();
 21 
			key = GetKey();
22 
			if (key==013){ //Enter
 22 
			if (key==013){ //Enter
23 
				draw_window();
 - 
 
24 
				WriteText(50,90,0x80,0xFF00FF,io.dir_position(i));
 - 
 
- 
 
 23 
				draw_window();
25 
				if(i
 24
26 
			}
 25 
			}
Line 27... Line 26...
27 
			break;
 26 
			break;
28
27
Line 33... Line 32...
33 
   }
 32 
   }
34 
}
 33 
}
35 
void draw_window()
 34 
void draw_window()
36 
{
 35 
{
37 
	proc_info Form;
 36 
	proc_info Form;
- 
 
 37 
	int i;
- 
 
 38 
	i=0;
38 
	DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header");
 39 
	DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header");
39 
	GetProcessInfo(#Form, SelfInfo);
 40 
	GetProcessInfo(#Form, SelfInfo);
- 
 
 41 
	while(i
- 
 
 42 
	{
- 
 
 43 
		WriteText(5,i*8+3,0x80,0xFF00FF,io.dir.position(i));
- 
 
 44 
		i++;
- 
 
 45 
	}
40 
	WriteText(10,110,0x80,0,#param);
 46 
	WriteText(10,110,0x80,0,#param);
41 
}
 47 
}
Line 42... Line 48...
42 
 
 48