type Close_Window_Event is new Event with private;
type App_Blur_Event is new Event with private;
type App_Focus_Event is new Event with private;
APP_BLUR_ID : constant Event_Id := To_Event_Id( "App_Blur" );
APP_FOCUS_ID : constant Event_Id := To_Event_Id( "App_Focus" );
CLOSE_REQUEST_ID : constant Event_Id := To_Event_Id( "Close_Request" );
CLOSE_WINDOW_ID : constant Event_Id := To_Event_Id( "Close_Window" );