This package provides routines to handle initialization and set up of the Gdk library.
<c_version>1.3.6</c_version> <group>Gdk, the low-level API</group>
procedure Beep
Emit a beep.
procedure Flush
Flush the queue of graphic events and then wait until all requests have been received and processed.
procedure Gdk_Exit (Error_Code : Gint)
Restore the library to an un-itialized state and exits the program using the "exit" system call. Error_Code is the error value to pass to "exit". Allocated structures are freed and the program exits cleanly. This function is deprecated.
function Get_Display return String
Return the name of the display.
procedure Init
Initialize the library for use. The command line arguments are modified to reflect any arguments which were not handled. (Such arguments should either be handled by the application or dismissed).
function Keyboard_Grab
(Window : Gdk.Gdk_Window;
Owner_Events : Boolean := True;
Time : Guint32 := 0) return Gdk.Types.Gdk_Grab_Status
Grab the keyboard to a specific window.
Window is the window which will receive the grab
Owner_Events specifies whether events will be reported as is, or relative to Window
Time specifies the time
Requires a corresponding call to Keyboard_Ungrab
procedure Keyboard_Ungrab (Time : Guint32 := 0)
Release any keyboard grab.
function Pointer_Grab
(Window : Gdk.Gdk_Window;
Owner_Events : Boolean := True;
Event_Mask : Gdk.Event.Gdk_Event_Mask;
Confine_To : Gdk.Gdk_Window := null;
Cursor : Gdk.Gdk_Cursor := null;
Time : Guint32 := 0) return Gdk.Types.Gdk_Grab_Status
Grab the pointer to a specific window.
Window is the window which will receive the grab
Owner_Events specifies whether events will be reported as is, or relative to Window
Event_Mask masks only interesting events
Confine_To limits the cursor movement to the specified window
Cursor changes the cursor for the duration of the grab
Time specifies the time
Requires a corresponding call to Pointer_Ungrab
This is obsolescent in gtk-3, use Gdk.Device.Grab instead
function Pointer_Is_Grabbed return Boolean
Tell wether there is an active pointer grab in effect.
procedure Pointer_Ungrab (Time : Guint32 := 0)
Release any pointer grab.
function Screen_Height return Gint
Return the height of the screen.
function Screen_Height_MM return Gint
Return the height of the screen in millimeters.
function Screen_Width return Gint
Return the width of the screen.
function Screen_Width_MM return Gint
Return the width of the screen in millimeters.
procedure Set_Double_Click_Time (Msec : Guint)