Index

Package: Data_Item (generic)

Description

generic
      type Data_Type (<>) is limited private;
   package Data_Item is

Types

Data_Type

type Data_Type (<>) is limited private;

Data_Type_Access

type Data_Type_Access is access all Data_Type;

Gtk_Print_Func

type Gtk_Print_Func is access procedure
        (Func_Data : Data_Type_Access;
         Str       : String);

Gtk_Translate_Func

type Gtk_Translate_Func is access function
        (Path      : UTF8_String;  --  const gchar* ???
         Func_Data : Data_Type_Access) return Gtkada.Types.Chars_Ptr;

Limited_Widget

type Limited_Widget is limited private;

Gtk_Item_Factory_Callback

type Gtk_Item_Factory_Callback is access procedure
        (Callback_Data   : Data_Type_Access;
         Callback_Action : Guint;
         Widget          : Limited_Widget);

Constants & Global variables

Null_Widget (Limited_Widget)

Null_Widget : constant Limited_Widget;

Subprograms & Entries

To_Widget

function To_Widget 
(Widget: Limited_Widget) return Gtk.Widget.Gtk_Widget;

Gtk_New

function Gtk_New 
(Path: UTF8_String;
Accelerator: String := "";
Callback: Gtk_Item_Factory_Callback := null;
Item_Type: Item_Type_Enum;
Callback_Action: Guint := 0) return Gtk_Item_Factory_Entry;
Create a Gtk_Item_Factory_Entry. It is up to you to call Free at an appropriate point to avoid memory leaks.

Gtk_New

function Gtk_New 
(Path: UTF8_String;
Accelerator: String := "";
Callback: Gtk_Item_Factory_Callback := null;
Item_Type: String := "";
Callback_Action: Guint := 0) return Gtk_Item_Factory_Entry;
Create a Gtk_Item_Factory_Entry. It is up to you to call Free at an appropriate point to avoid memory leaks.

Gtk_New

function Gtk_New 
(Path: UTF8_String;
Accelerator: String := "";
Stock_Id: String;
Callback: Gtk_Item_Factory_Callback := null;
Callback_Action: Guint := 0) return Gtk_Item_Factory_Entry;
Create a Gtk_Item_Factory_Entry from a stock item. It is up to you to call Free at an appropriate point to avoid memory leaks.

Gtk_New

function Gtk_New 
(Path: UTF8_String;
Accelerator: String := "";
Callback: Gtk_Item_Factory_Callback := null;
Pixbuf: access Guchar_Array;
Callback_Action: Guint := 0) return Gtk_Item_Factory_Entry;
Create a Gtk_Item_Factory_Entry from an inline pixbuf image. It is up to you to call Free at an appropriate point to avoid memory leaks.

Free

procedure Free 
(Ientry: in out Gtk_Item_Factory_Entry);
Free all the dynamic data associated with an item factory entry.

Free

procedure Free 
(Ientries: in out Gtk_Item_Factory_Entry_Array);
Free all the dynamic data associated with each item factory entry.

Create_Item

procedure Create_Item 
(Ifactory: access Gtk_Item_Factory_Record'Class;
Ientry: Gtk_Item_Factory_Entry;
Callback_Data: Data_Type_Access;
Callback_Type: Guint);
Callback_Type = 0 -> Gtk_Item_Factory_Callback Callback_Type = 1 -> Gtk_Item_Factory_Callback1

Create_Items

procedure Create_Items 
(Ifactory: access Gtk_Item_Factory_Record'Class;
Entries: Gtk_Item_Factory_Entry_Array;
Callback_Data: Data_Type_Access);

Popup_Data

function Popup_Data 
(Ifactory: access Gtk_Item_Factory_Record'Class) return Data_Type_Access;

Popup_Data_From_Widget

function Popup_Data_From_Widget 
(Widget: access Gtk.Widget.Gtk_Widget_Record'Class) return Data_Type_Access;

Popup_With_Data

procedure Popup_With_Data 
(Ifactory: access Gtk_Item_Factory_Record'Class;
Popup_Data: Data_Type_Access;
Destroy: System.Address;
-- Gtk_Destroy_Notify ??? X: Guint;
Y: Guint;
Mouse_Button: Guint;
Time: Guint32);

Set_Translate_Func

procedure Set_Translate_Func 
(Ifactory: access Gtk_Item_Factory_Record'Class;
Func: Gtk_Translate_Func;
Data: Data_Type_Access;
Notify: System.Address);