package Gtk.Radio_Action is
package Implements_Gtk_Buildable is new Glib.Types.Implements (Gtk.Buildable.Gtk_Buildable, Gtk_Radio_Action_Record, Gtk_Radio_Action);
type Gtk_Radio_Action_Record is new Gtk_Toggle_Action_Record with null record;
type Gtk_Radio_Action is access all Gtk_Radio_Action_Record'Class;
type Cb_Gtk_Radio_Action_Gtk_Radio_Action_Void is not null access procedure (Self : access Gtk_Radio_Action_Record'Class; Current : not null access Gtk_Radio_Action_Record'Class);
type Cb_GObject_Gtk_Radio_Action_Void is not null access procedure (Self : access Glib.Object.GObject_Record'Class; Current : not null access Gtk_Radio_Action_Record'Class);
Current_Value_Property : constant Glib.Properties.Property_Int;
Group_Property : constant Glib.Properties.Property_Object;
Value_Property : constant Glib.Properties.Property_Int;
Signal_Changed : constant Glib.Signal_Name := "changed";
procedure Gtk_New
| ( | Action | : out Gtk_Radio_Action; |
| Name | : UTF8_String; | |
| Label | : UTF8_String := ""; | |
| Tooltip | : UTF8_String := ""; | |
| Stock_Id | : UTF8_String := ""; | |
| Value | : Gint); |
procedure Initialize
| ( | Action | : not null access Gtk_Radio_Action_Record'Class; |
| Name | : UTF8_String; | |
| Label | : UTF8_String := ""; | |
| Tooltip | : UTF8_String := ""; | |
| Stock_Id | : UTF8_String := ""; | |
| Value | : Gint); |
function Gtk_Radio_Action_New
| ( | Name | : UTF8_String; |
| Label | : UTF8_String := ""; | |
| Tooltip | : UTF8_String := ""; | |
| Stock_Id | : UTF8_String := ""; | |
| Value | : Gint) return Gtk_Radio_Action; |
function Get_Type return Glib.GType;
function Get_Current_Value
| ( | Action | : not null access Gtk_Radio_Action_Record) return Gint; |
procedure Set_Current_Value
| ( | Action | : not null access Gtk_Radio_Action_Record; |
| Current_Value | : Gint); |
function Get_Group
| ( | Action | : not null access Gtk_Radio_Action_Record) return Gtk.Widget.Widget_SList.GSlist; |
procedure Set_Group
| ( | Action | : not null access Gtk_Radio_Action_Record; |
| Group | : Gtk.Widget.Widget_SList.GSlist); |
procedure Join_Group
| ( | Action | : not null access Gtk_Radio_Action_Record; |
| Group_Source | : access Gtk_Radio_Action_Record'Class); |
procedure On_Changed
| ( | Self | : not null access Gtk_Radio_Action_Record; |
| Call | : Cb_Gtk_Radio_Action_Gtk_Radio_Action_Void; | |
| After | : Boolean := False); |
procedure On_Changed
| ( | Self | : not null access Gtk_Radio_Action_Record; |
| Call | : Cb_GObject_Gtk_Radio_Action_Void; | |
| Slot | : not null access Glib.Object.GObject_Record'Class; | |
| After | : Boolean := False); |
function "+"
| ( | Widget | : access Gtk_Radio_Action_Record'Class) return Gtk.Buildable.Gtk_Buildable renames Implements_Gtk_Buildable.To_Interface; |
function "-"
| ( | Interf | : Gtk.Buildable.Gtk_Buildable) return Gtk_Radio_Action renames Implements_Gtk_Buildable.To_Object; |