package Gdk.Cursor is
package Gdk_Cursor_Type_Properties is new Generic_Internal_Discrete_Property (Gdk_Cursor_Type);
type Gdk_Cursor_Type is ( Blank_Cursor, Cursor_Is_Pixmap, X_Cursor, Arrow, Based_Arrow_Down, Based_Arrow_Up, Boat, Bogosity, Bottom_Left_Corner, Bottom_Right_Corner, Bottom_Side, Bottom_Tee, Box_Spiral, Center_Ptr, Circle, Clock, Coffee_Mug, Cross, Cross_Reverse, Crosshair, Diamond_Cross, Dot, Dotbox, Double_Arrow, Draft_Large, Draft_Small, Draped_Box, Exchange, Fleur, Gobbler, Gumby, Hand1, Hand2, Heart, Icon, Iron_Cross, Left_Ptr, Left_Side, Left_Tee, Leftbutton, Ll_Angle, Lr_Angle, Man, Middlebutton, Mouse, Pencil, Pirate, Plus, Question_Arrow, Right_Ptr, Right_Side, Right_Tee, Rightbutton, Rtl_Logo, Sailboat, Sb_Down_Arrow, Sb_H_Double_Arrow, Sb_Left_Arrow, Sb_Right_Arrow, Sb_Up_Arrow, Sb_V_Double_Arrow, Shuttle, Sizing, Spider, Spraycan, Star, Target, Tcross, Top_Left_Arrow, Top_Left_Corner, Top_Right_Corner, Top_Side, Top_Tee, Trek, Ul_Angle, Umbrella, Ur_Angle, Watch, Xterm, Last_Cursor);
type Property_Gdk_Cursor_Type is new Gdk_Cursor_Type_Properties.Property;
Cursor_Type_Property : constant Glib.Properties.Property_Boxed;
Display_Property : constant Glib.Properties.Property_Boxed;
procedure Gdk_New
( | Self | : out Gdk_Cursor; |
Cursor_Type | : Gdk_Cursor_Type); |
function Gdk_Cursor_New
( | Cursor_Type | : Gdk_Cursor_Type) return Gdk_Cursor; |
procedure Gdk_New_For_Display
( | Self | : out Gdk_Cursor; |
Display | : not null access Gdk.Display.Gdk_Display_Record'Class; | |
Cursor_Type | : Gdk_Cursor_Type); |
function Gdk_Cursor_New_For_Display
( | Display | : not null access Gdk.Display.Gdk_Display_Record'Class; |
Cursor_Type | : Gdk_Cursor_Type) return Gdk_Cursor; |
procedure Gdk_New_From_Name
( | Self | : out Gdk_Cursor; |
Display | : not null access Gdk.Display.Gdk_Display_Record'Class; | |
Name | : UTF8_String); |
function Gdk_Cursor_New_From_Name
( | Display | : not null access Gdk.Display.Gdk_Display_Record'Class; |
Name | : UTF8_String) return Gdk_Cursor; |
function Get_Type return Glib.GType;
function Get_Cursor_Type
( | Self | : Gdk.Gdk_Cursor) return Gdk_Cursor_Type; |
function Get_Display
( | Self | : Gdk.Gdk_Cursor) return Gdk.Display.Gdk_Display; |
procedure Ref
( | Self | : Gdk.Gdk_Cursor); |
procedure Unref
( | Self | : Gdk.Gdk_Cursor); |