## 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-2003 ACT-Europe                 --

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.     --  <group>Gdk, the low-level API</group>

32.     with Gdk.ColorTo API docTo specTo body;

33.     with Gdk.CursorTo API docTo specTo body;

34.     with Gdk.EventTo API docTo specTo body;

35.     with Gdk.VisualTo API docTo specTo body;

36.     with Gdk.WindowTo API docTo specTo body;

37.     with GlibTo API docTo specTo body;

39.     package Gdk.Window_AttrTo API docTo specTo body is

41.        subtype Gdk_Window_Attr is Gdk.Gdk_Window_AttrTo API docTo spec;

42.        Null_Window_Attr : constant Gdk_Window_AttrTo API docTo spec;

43.        --  This record describes the initial attributes for a window. Most of

44.        --  them can be changed later on, but it is more efficient to set them

45.        --  right from the start.

46.        --  You usually need to do the following when initializing such a

47.        --  structure:

48.        --      Window_Attr.Visual := Get_Visual (Window);

49.        --      Window_Attr.Colormap := Get_Colormap (Window);

50.        --      Window_Attr.Event_Mask := Get_Events (Window) or Exposure_Mask;

52.        procedure Gdk_NewTo API docTo body

53.          (Window_Attr       : out Gdk_Window_AttrTo API docTo spec;

54.           Title             : Glib.UTF8_StringTo API docTo spec := "";

55.           Event_Mask        : Gdk.Event.Gdk_Event_MaskTo API docTo spec := 0;

56.           X, Y              : Glib.GintTo API docTo spec := 0;

57.           Width             : Glib.GintTo API docTo spec := 0;

58.           Height            : Glib.GintTo API docTo spec := 0;

59.           WclassTo API docTo body            : Gdk.Window.Gdk_Window_ClassTo API docTo spec :=

60.             Gdk.Window.Input_Output;

61.           Visual            : Gdk.Visual.Gdk_VisualTo API docTo spec := null;

62.           Colormap          : Gdk.Color.Gdk_ColormapTo API docTo spec := null;

63.           Window_TypeTo API docTo body       : Gdk.Window.Gdk_Window_TypeTo API docTo spec :=

64.             Gdk.Window.Window_Root;

65.           Cursor            : Gdk.Cursor.Gdk_CursorTo API docTo spec := null;

66.           Wmclass_Name      : String := "";

67.           Wmclass_Class     : String := "";

68.           Override_Redirect : Boolean := True);

69.        --  Creates a new Gdk_Window_Attr structure.

70.        --  It is your responsability to free the visual, colormap, cursor,... field

71.        --  when they are no longer needed.

73.        procedure DestroyTo API docTo body (Window_Attr : in out Gdk_Window_AttrTo API docTo spec);

75.        procedure Set_TitleTo API docTo body

76.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

77.           Title       : Glib.UTF8_StringTo API docTo spec);

79.        function Get_TitleTo API docTo body (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Glib.UTF8_StringTo API docTo spec;

81.        procedure Set_Event_MaskTo API docTo body

82.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

83.           Event_Mask  : Gdk.Event.Gdk_Event_MaskTo API docTo spec);

85.        function Get_Event_MaskTo API docTo body

86.          (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Gdk.Event.Gdk_Event_MaskTo API docTo spec;

88.        procedure Set_XTo API docTo body

89.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

90.           X           : Glib.GintTo API docTo spec);

92.        function Get_XTo API docTo body (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Glib.GintTo API docTo spec;

94.        procedure Set_YTo API docTo body

95.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

96.           Y           : Glib.GintTo API docTo spec);

98.        function Get_YTo API docTo body (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Glib.GintTo API docTo spec;

100.        procedure Set_WidthTo API docTo body

101.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

102.           Width       : Glib.GintTo API docTo spec);

104.        function Get_WidthTo API docTo body (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Glib.GintTo API docTo spec;

106.        procedure Set_HeightTo API docTo body

107.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

108.           Height      : Glib.GintTo API docTo spec);

110.        function Get_HeightTo API docTo body (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Glib.GintTo API docTo spec;

112.        procedure Set_Window_ClassTo API docTo body

113.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

114.           Wclass      : Gdk.Window.Gdk_Window_ClassTo API docTo spec);

116.        function Get_Window_ClassTo API docTo body

117.          (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Gdk.Window.Gdk_Window_ClassTo API docTo spec;

119.        procedure Set_VisualTo API docTo body

120.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

121.           Visual      : Gdk.Visual.Gdk_VisualTo API docTo spec);

123.        function Get_VisualTo API docTo body

124.          (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Gdk.Visual.Gdk_VisualTo API docTo spec;

126.        procedure Set_ColormapTo API docTo body

127.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

128.           Colormap    : Gdk.Color.Gdk_ColormapTo API docTo spec);

130.        function Get_ColormapTo API docTo body

131.          (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Gdk.Color.Gdk_ColormapTo API docTo spec;

133.        procedure Set_Window_TypeTo API docTo body

134.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

135.           Window_Type : Gdk.Window.Gdk_Window_TypeTo API docTo spec);

137.        function Get_Window_TypeTo API docTo body

138.          (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Gdk.Window.Gdk_Window_TypeTo API docTo spec;

140.        procedure Set_CursorTo API docTo body

141.          (Window_Attr : Gdk_Window_AttrTo API docTo spec;

142.           Cursor      : Gdk.Cursor.Gdk_CursorTo API docTo spec);

144.        function Get_CursorTo API docTo body

145.          (Window_Attr : Gdk_Window_AttrTo API docTo spec)

146.           return Gdk.Cursor.Gdk_CursorTo API docTo spec;

148.        procedure Set_Wmclass_NameTo API docTo body

149.          (Window_Attr  : Gdk_Window_AttrTo API docTo spec;

150.           Wmclass_Name : String);

152.        function Get_Wmclass_NameTo API docTo body (Window_Attr : Gdk_Window_AttrTo API docTo spec) return String;

154.        procedure Set_Wmclass_ClassTo API docTo body

155.          (Window_Attr   : Gdk_Window_AttrTo API docTo spec;

156.           Wmclass_Class : String);

158.        function Get_Wmclass_ClassTo API docTo body (Window_Attr : Gdk_Window_AttrTo API docTo spec) return String;

160.        procedure Set_Override_RedirectTo API docTo body

161.          (Window_Attr       : Gdk_Window_AttrTo API docTo spec;

162.           Override_Redirect : Boolean);

164.        function Get_Override_RedirectTo API docTo body

165.          (Window_Attr : Gdk_Window_AttrTo API docTo spec) return Boolean;

167.     private

168.        Null_Window_AttrTo API docTo spec : constant Gdk_Window_AttrTo API docTo spec := null;

169.        pragma Import (C, Get_ColormapTo API docTo spec, "ada_gdk_window_attr_get_colormap");

170.        pragma Import (C, Get_CursorTo API docTo spec, "ada_gdk_window_attr_get_cursor");

171.        pragma Import (C, Get_Event_MaskTo API docTo spec, "ada_gdk_window_attr_get_event_mask");

172.        pragma Import (C, Get_HeightTo API docTo spec, "ada_gdk_window_attr_get_height");

173.        pragma Import (C, Get_VisualTo API docTo spec, "ada_gdk_window_attr_get_visual");

174.        pragma Import (C, Get_WidthTo API docTo spec, "ada_gdk_window_attr_get_width");

175.        pragma Import (C, Get_Window_ClassTo API docTo spec, "ada_gdk_window_attr_get_wclass");

176.        pragma Import (C, Get_Window_TypeTo API docTo spec, "ada_gdk_window_attr_get_window_type");

177.        pragma Import (C, Get_XTo API docTo spec, "ada_gdk_window_attr_get_x");

178.        pragma Import (C, Get_YTo API docTo spec, "ada_gdk_window_attr_get_y");

179.        pragma Import (C, Set_ColormapTo API docTo spec, "ada_gdk_window_attr_set_colormap");

180.        pragma Import (C, Set_CursorTo API docTo spec, "ada_gdk_window_attr_set_cursor");

181.        pragma Import (C, Set_Event_MaskTo API docTo spec, "ada_gdk_window_attr_set_event_mask");

182.        pragma Import (C, Set_HeightTo API docTo spec, "ada_gdk_window_attr_set_height");

183.        pragma Import (C, Set_VisualTo API docTo spec, "ada_gdk_window_attr_set_visual");

184.        pragma Import (C, Set_WidthTo API docTo spec, "ada_gdk_window_attr_set_width");

185.        pragma Import (C, Set_Window_ClassTo API docTo spec, "ada_gdk_window_attr_set_wclass");

186.        pragma Import (C, Set_Window_TypeTo API docTo spec, "ada_gdk_window_attr_set_window_type");

187.        pragma Import (C, Set_XTo API docTo spec, "ada_gdk_window_attr_set_x");

188.        pragma Import (C, Set_YTo API docTo spec, "ada_gdk_window_attr_set_y");

189.     end Gdk.Window_AttrTo API docTo specTo body;