Next: , Previous: Package_Gdk.Color, Up: Top



Package Gdk.Cursor

This package provides the capability to create predefined mouse cursors as well as user defined ones.

Types

type Gdk_Cursor is new Gdk.C_Proxy;





type Gdk_Cursor_Type is
(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);




Subprograms
procedure Gdk_New (Widget : out Gdk_Cursor; Cursor_Type : Gdk_Cursor_Type);
Create a new standard cursor.

procedure Gdk_New (Widget : out Gdk_Cursor; Source : Gdk.Gdk_Pixmap; Mask : Gdk.Gdk_Pixmap; Fg : Gdk.Color.Gdk_Color; Bg : Gdk.Color.Gdk_Color; X : Glib.Gint; Y : Glib.Gint);
Create a new cursor from a given pixmap and mask.
Both the pixmap and mask must have a depth of 1 (i.e. each pixel has only 2 values - on or off). The standard cursor size is 16 by 16 pixels.
  • Source is the pixmap specifying the cursor.
  • Mask is the pixmap specifying the mask, which must be the same size as source.
  • Fg is the foreground color, used for the bits in the source which are enabled. The color does not have to be allocated first.
  • Bg is the background color, used for the bits in the source which are disabled. The color does not have to be allocated first.
  • X is the horizontal offset of the 'hotspot' of the cursor.
  • Y is the vertical offset of the 'hotspot' of the cursor.

procedure Destroy (Cursor : Gdk_Cursor);
Destroy a cursor, freeing any resources allocated for it.
Deprecated, use Unref instead.

procedure Ref (Cursor : Gdk_Cursor);
Increment the reference counting for the cursor.

procedure Unref (Cursor : Gdk_Cursor);
Decrement the reference counting for the cursor.
When this reaches 0, the cursor is destroyed.