package Gtk.Toggle_Action is
package Implements_Gtk_Buildable is new Glib.Types.Implements (Gtk.Buildable.Gtk_Buildable, Gtk_Toggle_Action_Record, Gtk_Toggle_Action);
type Gtk_Toggle_Action_Record is new Gtk_Action_Record with null record;
type Gtk_Toggle_Action is access all Gtk_Toggle_Action_Record'Class;
type Cb_Gtk_Toggle_Action_Void is not null access procedure (Self : access Gtk_Toggle_Action_Record'Class);
type Cb_GObject_Void is not null access procedure (Self : access Glib.Object.GObject_Record'Class);
Active_Property : constant Glib.Properties.Property_Boolean;
Draw_As_Radio_Property : constant Glib.Properties.Property_Boolean;
Signal_Toggled : constant Glib.Signal_Name := "toggled";
procedure Gtk_New
( | Action | : out Gtk_Toggle_Action; |
Name | : UTF8_String; | |
Label | : UTF8_String := ""; | |
Tooltip | : UTF8_String := ""; | |
Stock_Id | : UTF8_String := ""); |
procedure Initialize
( | Action | : not null access Gtk_Toggle_Action_Record'Class; |
Name | : UTF8_String; | |
Label | : UTF8_String := ""; | |
Tooltip | : UTF8_String := ""; | |
Stock_Id | : UTF8_String := ""); |
function Gtk_Toggle_Action_New
( | Name | : UTF8_String; |
Label | : UTF8_String := ""; | |
Tooltip | : UTF8_String := ""; | |
Stock_Id | : UTF8_String := "") return Gtk_Toggle_Action; |
function Get_Type return Glib.GType;
function Get_Active
( | Action | : not null access Gtk_Toggle_Action_Record) return Boolean; |
procedure Set_Active
( | Action | : not null access Gtk_Toggle_Action_Record; |
Is_Active | : Boolean); |
function Get_Draw_As_Radio
( | Action | : not null access Gtk_Toggle_Action_Record) return Boolean; |
procedure Set_Draw_As_Radio
( | Action | : not null access Gtk_Toggle_Action_Record; |
Draw_As_Radio | : Boolean); |
procedure Toggled
( | Action | : not null access Gtk_Toggle_Action_Record); |
procedure On_Toggled
( | Self | : not null access Gtk_Toggle_Action_Record; |
Call | : Cb_Gtk_Toggle_Action_Void; | |
After | : Boolean := False); |
procedure On_Toggled
( | Self | : not null access Gtk_Toggle_Action_Record; |
Call | : Cb_GObject_Void; | |
Slot | : not null access Glib.Object.GObject_Record'Class; | |
After | : Boolean := False); |
function "+"
( | Widget | : access Gtk_Toggle_Action_Record'Class) return Gtk.Buildable.Gtk_Buildable renames Implements_Gtk_Buildable.To_Interface; |
function "-"
( | Interf | : Gtk.Buildable.Gtk_Buildable) return Gtk_Toggle_Action renames Implements_Gtk_Buildable.To_Object; |