- TGUIEvent = Record
- Case EventType: TGUIEventType Of
- etKeyDown: (KeyDown: TKeyDownEvent);
- etMouseBtnLDown: (MouseBtnLDown: TMouseButtonEvent);
- etMouseBtnRDown: (MouseBtnRDown: TMouseButtonEvent);
- etMouseMove: (MouseMove: TMouseMoveEvent);
- etMouseWheel: (MouseWheel: TMouseWheelEvent);
- End;