Subversion Repositories Kolibri OS

Rev

Rev 9363 | Details | Compare with Previous | Last modification | View Log | RSS feed

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