Source position: GLSDLWindow.pas line 62
type TGLSDLEvent = procedure(
Sender: TObject;
const event: TSDL_Event
) of object;