Subversion Repositories Kolibri OS

Rev

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

Rev 3434 Rev 4081
Line 78... Line 78...
78
	SetEventMask(100111b);
78
	SetEventMask(100111b);
Line 79... Line 79...
79
	
79
	
80
	loop() switch(WaitEvent())
80
	loop() switch(WaitEvent())
81
	{
81
	{
-
 
82
	case evMouse:
82
	case evMouse:
83
				if (!CheckActiveProcess(MenuForm.ID)) ExitProcess();
83
				m.get();
-
 
84
 
-
 
85
				id1=GetProcessSlot(MenuForm.ID);
-
 
86
				if (id1<>GetActiveProcess()) ExitProcess();
84
				m.get();
87
				id1=m.y-1/ITEM_HEIGHT;
85
				id1=m.y-1/ITEM_HEIGHT;
88
				if (m.y<0) || (id1+1>items_num) || (m.x<0) || (m.x>ITEM_WIDTH) break;
86
				if (m.y<0) || (id1+1>items_num) || (m.x<0) || (m.x>ITEM_WIDTH) break;
89
				if (m.lkm) || (m.pkm)
87
				if (m.lkm) || (m.pkm)
90
				{
88
				{