Source position: gdktypes.pp line 1037
type TGdkEvent = record  | 
case LongInt of  | 
0: (  | 
thetype: TGdkEventType;  | 
);  | 
1: (  | 
any: TGdkEventAny;  | 
);  | 
2: (  | 
expose: TGdkEventExpose;  | 
);  | 
3: (  | 
no_expose: TGdkEventNoExpose;  | 
);  | 
4: (  | 
visibility: TGdkEventVisibility;  | 
);  | 
5: (  | 
motion: TGdkEventMotion;  | 
);  | 
6: (  | 
button: TGdkEventButton;  | 
);  | 
7: (  | 
key: TGdkEventKey;  | 
);  | 
8: (  | 
crossing: TGdkEventCrossing;  | 
);  | 
9: (  | 
focus_change: TGdkEventFocus;  | 
);  | 
10: (  | 
configure: TGdkEventConfigure;  | 
);  | 
11: (  | 
theproperty: TGdkEventProperty;  | 
);  | 
12: (  | 
selection: TGdkEventSelection;  | 
);  | 
13: (  | 
proximity: TGdkEventProximity;  | 
);  | 
14: (  | 
client: TGdkEventClient;  | 
);  | 
15: (  | 
dnd: TGdkEventDND;  | 
);  | 
end;  |