Rev 4041 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 4041 | Rev 4425 | ||
|---|---|---|---|
| Line 69... | Line 69... | ||
| 69 | loop() |
69 | loop() |
| 70 | { |
70 | { |
| 71 | switch(WaitEvent()) |
71 | switch(WaitEvent()) |
| 72 | { |
72 | { |
| 73 | case evMouse: |
73 | case evMouse: |
| 74 | if (GetProcessSlot(Form.ID)-GetActiveProcess()!=0) break; |
74 | if (!CheckActiveProcess(Form.ID)) break; |
| 75 | edit_box_mouse stdcall (#edit_disk_size); |
75 | edit_box_mouse stdcall (#edit_disk_size); |
| 76 | break; |
76 | break; |
| Line 77... | Line 77... | ||
| 77 | 77 | ||
| 78 | case evButton: |
78 | case evButton: |