Rev 3434 | 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 | { |