forked from KolibriOS/kolibrios
45 lines
765 B
C
45 lines
765 B
C
#define MEMSIZE 0x3E80
|
|
#include "..\lib\kolibri.h"
|
|
#include "..\lib\strings.h"
|
|
#include "..\lib\file_system.h"
|
|
|
|
|
|
void main()
|
|
{
|
|
int id, key;
|
|
|
|
loop()
|
|
{
|
|
switch(WaitEvent())
|
|
{
|
|
case evButton:
|
|
id=GetButtonID();
|
|
if (id==1) ExitProcess();
|
|
break;
|
|
|
|
case evKey:
|
|
key = GetKey();
|
|
IF (key==013){ //Enter
|
|
WriteText(50,90,0x80,0xFF00FF,"Pressed Enter");
|
|
}
|
|
break;
|
|
|
|
case evReDraw:
|
|
draw_window();
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void draw_window()
|
|
{
|
|
proc_info Form;
|
|
DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header");
|
|
GetProcessInfo(#Form, SelfInfo);
|
|
WriteText(50,80,0x80,0,"Press Enter");
|
|
}
|
|
|
|
|
|
stop:
|