Subversion Repositories Kolibri OS

Rev

Rev 9362 | Go to most recent revision | Details | Last modification | View Log | RSS feed

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