## Documentation

Table of Contents
Class Inheritance Tree
Widget Screenshots
Package groups

1.     -----------------------------------------------------------------------

2.     --               GtkAda - Ada95 binding for Gtk+/Gnome               --

3.     --                                                                   --

4.     --   Copyright (C) 1998-2000 E. Briot, J. Brobecker and A. Charlet   --

5.     --                Copyright (C) 2000-2011, AdaCore                   --

6.     --                                                                   --

7.     -- This library is free software; you can redistribute it and/or     --

8.     -- modify it under the terms of the GNU General Public               --

9.     -- License as published by the Free Software Foundation; either      --

10.     -- version 2 of the License, or (at your option) any later version.  --

11.     --                                                                   --

12.     -- This library is distributed in the hope that it will be useful,   --

13.     -- but WITHOUT ANY WARRANTY; without even the implied warranty of    --

14.     -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU --

15.     -- General Public License for more details.                          --

16.     --                                                                   --

17.     -- You should have received a copy of the GNU General Public         --

18.     -- License along with this library; if not, write to the             --

19.     -- Free Software Foundation, Inc., 59 Temple Place - Suite 330,      --

20.     -- Boston, MA 02111-1307, USA.                                       --

21.     --                                                                   --

22.     -- As a special exception, if other files instantiate generics from  --

23.     -- this unit, or you link this unit with other files to produce an   --

24.     -- executable, this  unit  does not  by itself cause  the resulting  --

25.     -- executable to be covered by the GNU General Public License. This  --

26.     -- exception does not however invalidate any other reasons why the   --

27.     -- executable file  might be covered by the  GNU Public License.     --

28.     -----------------------------------------------------------------------

30.     --  <description>

31.     --  A Gtk_Check_Button places a discrete Gtk_Toggle_Button next to a widget,

32.     --  (usually a Gtk_Label).

33.     --

34.     --  </description>

35.     --  <screenshot>gtk-check_button</screenshot>

36.     --  <group>Buttons and Toggles</group>

37.     --  <testgtk>create_check_buttons.adb</testgtk>

39.     pragma Warnings (Off, "*is already use-visible*");

40.     with GlibTo API docTo specTo body;              use GlibTo API docTo specTo body;

41.     with Glib.TypesTo API docTo specTo body;        use Glib.TypesTo API docTo specTo body;

42.     with Gtk.ActionTo API docTo specTo body;        use Gtk.ActionTo API docTo specTo body;

43.     with Gtk.ActivatableTo API docTo specTo body;   use Gtk.ActivatableTo API docTo specTo body;

44.     with Gtk.BuildableTo API docTo specTo body;     use Gtk.BuildableTo API docTo specTo body;

45.     with Gtk.Toggle_ButtonTo API docTo specTo body; use Gtk.Toggle_ButtonTo API docTo specTo body;

46.     with Gtk.WidgetTo API docTo specTo body;        use Gtk.WidgetTo API docTo specTo body;

48.     package Gtk.Check_ButtonTo API docTo specTo body is

50.        type Gtk_Check_Button_Record is new Gtk_Toggle_Button_RecordTo API docTo spec with null record;

51.        type Gtk_Check_Button is access all Gtk_Check_Button_RecordTo API docTo spec'Class;

53.        ------------------

54.        -- Constructors --

55.        ------------------

57.        procedure Gtk_NewTo API docTo body

58.           (Check_Button : out Gtk_Check_ButtonTo API docTo spec;

59.            Label        : UTF8_StringTo API docTo spec := "");

60.        procedure InitializeTo API docTo body

61.           (Check_Button : access Gtk_Check_Button_RecordTo API docTo spec'Class;

62.            Label        : UTF8_StringTo API docTo spec := "");

63.        --  Create a check button. if Label is null, then no widget is associated

64.        --  with the button, and any widget can be added to the button (with

65.        --  Gtk.Container.Add).

67.        procedure Gtk_New_With_MnemonicTo API docTo body

68.           (Check_Button : out Gtk_Check_ButtonTo API docTo spec;

69.            Label        : UTF8_StringTo API docTo spec);

70.        procedure Initialize_With_MnemonicTo API docTo body

71.           (Check_Button : access Gtk_Check_Button_RecordTo API docTo spec'Class;

72.            Label        : UTF8_StringTo API docTo spec);

73.        --  Creates a new Gtk.Check_Button.Gtk_Check_Button containing a label. The

74.        --  label will be created using Gtk.Label.Gtk_New_With_Mnemonic, so

75.        --  underscores in Label indicate the mnemonic for the check button.

76.        --  "label": The text of the button, with an underscore in front of the

77.        --  mnemonic character

79.        function Get_TypeTo API docTo body return Glib.GTypeTo API docTo spec;

80.        pragma Import (C, Get_TypeTo API docTo spec, "gtk_check_button_get_type");

82.        ---------------------

83.        -- Interfaces_Impl --

84.        ---------------------

86.        procedure Do_Set_Related_ActionTo API docTo body

87.           (Self   : access Gtk_Check_Button_RecordTo API docTo spec;

88.            Action : access Gtk.Action.Gtk_Action_RecordTo API docTo specTo body'Class);

90.        function Get_Related_ActionTo API docTo body

91.           (Self : access Gtk_Check_Button_RecordTo API docTo spec) return Gtk.Action.Gtk_ActionTo API docTo spec;

92.        procedure Set_Related_ActionTo API docTo body

93.           (Self   : access Gtk_Check_Button_RecordTo API docTo spec;

94.            Action : access Gtk.Action.Gtk_Action_RecordTo API docTo specTo body'Class);

96.        function Get_Use_Action_AppearanceTo API docTo body

97.           (Self : access Gtk_Check_Button_RecordTo API docTo spec) return Boolean;

98.        procedure Set_Use_Action_AppearanceTo API docTo body

99.           (Self           : access Gtk_Check_Button_RecordTo API docTo spec;

100.            Use_Appearance : Boolean);

102.        procedure Sync_Action_PropertiesTo API docTo body

103.           (Self   : access Gtk_Check_Button_RecordTo API docTo spec;

104.            Action : access Gtk.Action.Gtk_Action_RecordTo API docTo specTo body'Class);

106.        ----------------

107.        -- Interfaces --

108.        ----------------

109.        --  This class implements several interfaces. See Glib.Types

110.        --

111.        --  - "Activatable"

112.        --

113.        --  - "Buildable"

115.        package Implements_Activatable is new Glib.Types.ImplementsTo API docTo specTo body

116.          (Gtk.Activatable.Gtk_ActivatableTo API docTo spec, Gtk_Check_Button_RecordTo API docTo spec, Gtk_Check_ButtonTo API docTo spec);

117.        function "+"

118.          (Widget : access Gtk_Check_Button_RecordTo API docTo spec'Class)

119.        return Gtk.Activatable.Gtk_ActivatableTo API docTo spec

120.        renames Implements_Activatable.To_InterfaceTo API docTo specTo body;

121.        function "-"

122.          (Interf : Gtk.Activatable.Gtk_ActivatableTo API docTo spec)

123.        return Gtk_Check_ButtonTo API docTo spec

124.        renames Implements_Activatable.To_ObjectTo API docTo specTo body;

126.        package Implements_Buildable is new Glib.Types.ImplementsTo API docTo specTo body

127.          (Gtk.Buildable.Gtk_BuildableTo API docTo spec, Gtk_Check_Button_RecordTo API docTo spec, Gtk_Check_ButtonTo API docTo spec);

128.        function "+"

129.          (Widget : access Gtk_Check_Button_RecordTo API docTo spec'Class)

130.        return Gtk.Buildable.Gtk_BuildableTo API docTo spec

131.        renames Implements_Buildable.To_InterfaceTo API docTo specTo body;

132.        function "-"

133.          (Interf : Gtk.Buildable.Gtk_BuildableTo API docTo spec)

134.        return Gtk_Check_ButtonTo API docTo spec

135.        renames Implements_Buildable.To_ObjectTo API docTo specTo body;

137.     end Gtk.Check_ButtonTo API docTo specTo body;