## Documentation

Table of Contents
Class Inheritance Tree
Widget Screenshots
Package groups

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

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

3.     --                                                                   --

4.     --                    Copyright (C) 2010, AdaCore                    --

5.     --                                                                   --

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

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

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

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

10.     --                                                                   --

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

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

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

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

15.     --                                                                   --

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

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

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

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

20.     --                                                                   --

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

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

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

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

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

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

27.     -----------------------------------------------------------------------

29.     --  <description>

30.     --  A Gtk_Cell_Renderer_Accel displays a keyboard accelerator (i.e. a key

31.     --  combination like <Control>-a). If the cell renderer is editable, the

32.     --  accelerator can be changed by simply typing the new combination.

33.     --

34.     --  The Gtk_Cell_Renderer_Accel cell renderer was added in GTK+ 2.10.

35.     --  </description>

36.     --  <c_version>2.16.6</c_version>

38.     with Glib.PropertiesTo API docTo specTo body;

39.     with Gtk.Cell_Renderer_TextTo API docTo specTo body;

41.     package Gtk.Cell_Renderer_AccelTo API docTo specTo body is

43.        type Gtk_Cell_Renderer_Accel_RecordTo API docTo body is

44.          new Gtk.Cell_Renderer_Text.Gtk_Cell_Renderer_Text_RecordTo API docTo specTo body with private;

45.        type Gtk_Cell_Renderer_Accel is

46.          access all Gtk_Cell_Renderer_Accel_RecordTo API docTo specTo body'Class;

48.        procedure Gtk_NewTo API docTo body (Widget : out Gtk_Cell_Renderer_AccelTo API docTo spec);

49.        --  Creates a new Gtk_Cell_Renderer_Accel.

51.        procedure InitializeTo API docTo body

52.          (Widget : access Gtk_Cell_Renderer_Accel_RecordTo API docTo specTo body'Class);

53.        --  Creates a new Gtk_Cell_Renderer_Accel.

55.        function Get_TypeTo API docTo body return GTypeTo API docTo spec;

56.        --  Return the internal value associated with this widget.

58.        ----------------

59.        -- Properties --

60.        ----------------

62.        --  <properties>

63.        --  Name:  Accel_Key_Property

64.        --  Type:  Uint

65.        --  Descr: The keyval of the accelerator

66.        --

67.        --  Name:  Accel_Mode_Property

68.        --  Type:  Enum

69.        --  Descr: The type of accelerators

70.        --

71.        --  Name:  Accel_Mods_Property

72.        --  Type:  Flags

73.        --  Descr: The modifier mask of the accelerator

74.        --

75.        --  Name:  Keycode_Property

76.        --  Type:  Uint

77.        --  Descr: The hardware keycode of the accelerator

78.        --

79.        --  </properties>

81.        Accel_Key_Property  : constant Glib.Properties.Property_UintTo API docTo spec;

82.        Accel_Mode_Property : constant Glib.Properties.Property_EnumTo API docTo spec;

83.        --  Accel_Mods_Property : constant Glib.Properties.Property_Flags;

84.        Keycode_Property    : constant Glib.Properties.Property_UintTo API docTo spec;

86.     private

87.        type Gtk_Cell_Renderer_Accel_RecordTo API docTo spec is

88.          new Gtk.Cell_Renderer_Text.Gtk_Cell_Renderer_Text_RecordTo API docTo specTo body with null record;

90.        Accel_Key_PropertyTo API docTo spec : constant Glib.Properties.Property_UintTo API docTo spec :=

91.          Glib.Properties.BuildTo API docTo specTo body ("accel-key");

92.        Accel_Mode_PropertyTo API docTo spec : constant Glib.Properties.Property_EnumTo API docTo spec :=

93.          Glib.Properties.BuildTo API docTo specTo body ("accel-mode");

94.        --  Accel_Mods_Property : constant Glib.Properties.Property_Flags :=

95.        --    Glib.Properties.Build ("accel-mods");

96.        Keycode_PropertyTo API docTo spec : constant Glib.Properties.Property_UintTo API docTo spec :=

97.          Glib.Properties.BuildTo API docTo specTo body ("keycode");

99.        pragma Import (C, Get_TypeTo API docTo spec, "gtk_cell_renderer_accel_get_type");

100.     end Gtk.Cell_Renderer_AccelTo API docTo specTo body;