This package provides routines to handle initialization and set up of the Gdk library.
Types |
---|
type Gdk_Grab_Status is (Grab_Success, Grab_Already_Grabbed, Gdk_Grab_Invalid_Time, Gdk_Grab_Not_Viewable, Gdk_Grab_Frozen); | |
|
Subprograms |
---|
procedure Init; | ||
Initialize the library for use. | ||
procedure Gdk_Exit (Error_Code : Gint); | ||
Restore the library to an un-itialized state and exits | ||
function Set_Locale return String; | ||
Initialize handling of internationalization of strings. | ||
procedure Set_Locale; | ||
Drops the string returned by the Set_Locale function;
| ||
procedure Set_Use_Xshm (Use_Xshm : Boolean := True); | ||
Set whether shared memory (when supported by the graphic server) should | ||
function Get_Use_Xshm return Boolean; | ||
Return whether shared memory on the graphic server is used.
| ||
function Get_Display return String; | ||
Return the name of the display.
| ||
function Pointer_Grab (Window : Gdk.Window.Gdk_Window; Owner_Events : Boolean := True; Event_Mask : Gdk.Event.Gdk_Event_Mask; Confine_To : Gdk.Window.Gdk_Window := Gdk.Window.Null_Window; Cursor : Gdk.Cursor.Gdk_Cursor := Gdk.Cursor.Null_Cursor; Time : Guint32) return Gdk_Grab_Status; | ||
Grab the pointer to a specific window.
| ||
procedure Pointer_Ungrab (Time : Guint32); | ||
Release any pointer grab.
| ||
function Pointer_Is_Grabbed return Boolean; | ||
Tell wether there is an active pointer grab in effect.
| ||
function Keyboard_Grab (Window : Gdk.Window.Gdk_Window; Owner_Events : Boolean := True; Time : Guint32) return Gdk_Grab_Status; | ||
Grab the keyboard to a specific window.
| ||
procedure Keyboard_Ungrab (Time : Guint32); | ||
Release any keyboard grab.
| ||
function Screen_Width return Gint; | ||
Return the width of the screen.
| ||
function Screen_Height return Gint; | ||
Return the height of the screen.
| ||
function Screen_Width_MM return Gint; | ||
Return the width of the screen in millimeters.
| ||
function Screen_Height_MM return Gint; | ||
Return the height of the screen in millimeters.
| ||
procedure Flush; | ||
Flush the queue of graphic events and then wait | ||
procedure Beep; | ||
Emit a beep.
| ||
procedure Set_Double_Click_Time (Msec : Guint); | ||
|