Next: , Previous: Package_Gtk.Image, Up: Top



Package Gtk.Image_Menu_Item

This widget works like a normal menu_item, but you can insert a arbitrary widget (most often a pixmap widget), which is displayed at the left side. The advantage is that indentation is handled the same way as GtkAda does (i.e if you create a menu with a Gtk_Check_Menu_Item, all normal menu_items are automatically indented by GtkAda - so if you use a normal menu_item to display pixmaps at the left side, the pixmaps will be indented, which is not what you want. This widget solves the problem).

Widget Hierarchy
     GObject                       (see Package_Glib.Object)
     Gtk_Object                    (see Package_Gtk.Object)
        \___ Gtk_Widget            (see Package_Gtk.Widget)
           \___ Gtk_Container      (see Package_Gtk.Container)
              \___ Gtk_Bin         (see Package_Gtk.Bin)
                 \___ Gtk_Item     (see Package_Gtk.Item)
                    \___ Gtk_Menu_Item (see Package_Gtk.Menu_Item)
                       \___ Gtk_Image_Menu_Item (see Package_Gtk.Image_Menu_Item)
     

Subprograms
procedure Gtk_New (Widget : out Gtk_Image_Menu_Item; Label : UTF8_String);
Create a new Gtk_Image_Menu_Item.
If label is non null, set the label of the menu item.

procedure Gtk_New_From_Stock (Widget : out Gtk_Image_Menu_Item; Stock_Id : String);
Create a new Gtk_Image_Menu_Item from a stock item.

procedure Gtk_New (Widget : out Gtk_Image_Menu_Item; Stock_Id : String; Accel_Group : Gtk.Accel_Group.Gtk_Accel_Group);
Create a new Gtk_Image_Menu_Item with a label.
If label contains an underscore, a mnemonic is created accordingly.

procedure Gtk_New_With_Mnemonic (Widget : out Gtk_Image_Menu_Item; Label : UTF8_String);
Create a new Gtk_Image_Menu_Item with a label.
If label contains an underscore, a mnemonic is created accordingly.

procedure Initialize_With_Mnemonic (Widget : access Gtk_Image_Menu_Item_Record'Class; Label : UTF8_String);
ditto.

procedure Initialize_From_Stock (Widget : access Gtk_Image_Menu_Item_Record'Class; Stock_Id : String);
ditto.

function Get_Type return Gtk.Gtk_Type;
Return the internal value associated with this widget.

procedure Set_Image (Menu_Item : access Gtk_Image_Menu_Item_Record; Image : access Gtk.Widget.Gtk_Widget_Record'Class);

function Get_Image (Menu_Item : access Gtk_Image_Menu_Item_Record) return Gtk.Widget.Gtk_Widget;