Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 5645 → Rev 5646

/programs/cmm/example/example.c
7,7 → 7,7
int id, key, i;
dword file;
mem_Init();
io.dir_buffer("/sys/",DIR_ONLYREAL);
io.dir_buffer("",DIR_ONLYREAL);
loop()
{
switch(WaitEvent())
21,8 → 21,7
key = GetKey();
if (key==013){ //Enter
draw_window();
WriteText(50,90,0x80,0xFF00FF,io.dir_position(i));
if(i<io.dir.count)i++;
}
break;
35,8 → 34,15
void draw_window()
{
proc_info Form;
int i;
i=0;
DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header");
GetProcessInfo(#Form, SelfInfo);
while(i<io.dir.count)
{
WriteText(5,i*8+3,0x80,0xFF00FF,io.dir.position(i));
i++;
}
WriteText(10,110,0x80,0,#param);
}