## 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.     --  This package contains various functions to draw widget parts on the screen.

32.     --  Whenever possible, you should use these functions instead of directly

33.     --  the ones from Gdk.Drawable, since this package will properly take into

34.     --  account the user's theme and color choice.

35.     --

36.     --  Consider also using directly the function Gtk.Widget.Modify_Font,

37.     --  Gtk.Widget.Modify_Background,... rather than use the lower level Gtk_Style

38.     --  object.

39.     --

40.     --  See Gtk.RC to learn how styles can be defined in external configuration

41.     --  files by the end-user of your application.

42.     --  </description>

43.     --  <c_version>2.8.17</c_version>

44.     --  <group>Configuration and Themes</group>

46.     with Glib.ObjectTo API docTo specTo body;

47.     with Glib.ValuesTo API docTo specTo body;

48.     with Gdk.ColorTo API docTo specTo body;        use Gdk.ColorTo API docTo specTo body;

49.     with Gdk.FontTo API docTo specTo body;         use Gdk.FontTo API docTo specTo body;

50.     with Gdk.GCTo API docTo specTo body;

51.     with Gdk.PixmapTo API docTo specTo body;

52.     with Gdk.RectangleTo API docTo specTo body;

53.     with Gdk.TypesTo API docTo spec;

54.     with Gdk.WindowTo API docTo specTo body;

55.     with Gtk.EnumsTo API docTo specTo body;        use Gtk.EnumsTo API docTo specTo body;

56.     with Pango.FontTo API docTo specTo body;

57.     with Pango.LayoutTo API docTo specTo body;

58.     with Interfaces.C.Strings;

60.     package Gtk.StyleTo API docTo specTo body is

62.        ------------

63.        -- Styles --

64.        ------------

66.        type Gtk_Style_Record is new Glib.Object.GObject_RecordTo API docTo specTo body with null record;

67.        type Gtk_Style is access all Gtk_Style_RecordTo API docTo spec'Class;

69.        Null_Style : constant Gtk_StyleTo API docTo spec := null;

71.        type Gtk_Rc_Property_Parser is access function

72.          (Pspec     : Glib.Param_SpecTo API docTo spec;

73.           Rc_String : Interfaces.C.Strings.chars_ptr;

74.           Value     : access Glib.Values.GValueTo API docTo specTo body) return GbooleanTo API docTo spec;

75.        pragma Convention (C, Gtk_Rc_Property_ParserTo API docTo spec);

76.        --  A function used to parse a string into the value of a property.

77.        --  Pspec is the property that is being parsed, Rc_String is the value as

78.        --  read in a gtk configuration file (any string, really), and Value should

79.        --  be set to the value read.

80.        --  See also Gtk.Settings

82.        procedure Gtk_NewTo API docTo body (Style : out Gtk_StyleTo API docTo spec);

83.        procedure InitializeTo API docTo body (Style : access Gtk_Style_RecordTo API docTo spec'Class);

84.        --  Creates or initializes a new style

86.        function Get_TypeTo API docTo body return Gtk.Gtk_TypeTo API docTo spec;

87.        --  Return the internal value associated with a Gtk_Style.

89.        function CopyTo API docTo body (Source : Gtk_StyleTo API docTo spec) return Gtk_StyleTo API docTo spec;

90.        --  Copy a Gtk_Style

92.        function AttachTo API docTo body

93.          (Style  : Gtk_StyleTo API docTo spec; Window : Gdk.Window.Gdk_WindowTo API docTo spec) return Gtk_StyleTo API docTo spec;

94.        procedure DetachTo API docTo body (Style : Gtk_StyleTo API docTo spec);

95.        --  Attaches a style to a window; this process allocates the colors and

96.        --  creates the GC's for the style - it specializes it to a particular

97.        --  visual and colormap. The process may involve the creation of a new style

98.        --  if the style has already been attached to a window with a different

99.        --  style and colormap.

100.        --  It returns either Style or a newly allocated style. If a new one is

101.        --  created, the parameter will be Unref once, and the new one Ref once.

103.        procedure Set_BackgroundTo API docTo body

104.          (Style      : Gtk_StyleTo API docTo spec;

105.           Window     : Gdk.Window.Gdk_WindowTo API docTo spec;

106.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec);

107.        --  Set the background color of Window to the background color specified

108.        --  by Style.

110.        procedure Apply_Default_BackgroundTo API docTo body

111.          (Style      : access Gtk_Style_RecordTo API docTo spec;

112.           Window     : Gdk.Window.Gdk_WindowTo API docTo spec;

113.           Set_Bg     : Boolean;

114.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

115.           AreaTo API docTo body       : Gdk.Rectangle.Gdk_RectangleTo API docTo spec;

116.           X          : GintTo API docTo spec;

117.           Y          : GintTo API docTo spec;

118.           Width      : GintTo API docTo spec;

119.           Height     : GintTo API docTo spec);

120.        --  Applies the default background from style to the given area in Window

122.        -----------------

123.        --  Properties --

124.        -----------------

125.        --  The style contains a number of properties. Each of these can be set to

126.        --  multiple values simulatenously, that will be applied depending on the

127.        --  widget's current state (highlighted, active, inactive,...)

129.        procedure Set_BackgroundTo API docTo body

130.          (Style      : Gtk_StyleTo API docTo spec;

131.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

132.           ColorTo API docTo body      : Gdk.Color.Gdk_ColorTo API docTo specTo body);

133.        procedure Set_Bg

134.          (Style      : Gtk_StyleTo API docTo spec;

135.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

136.           Color      : Gdk.Color.Gdk_ColorTo API docTo specTo body) renames Set_BackgroundTo API docTo specTo body;

137.        function Get_BackgroundTo API docTo body

138.          (Style      : Gtk_StyleTo API docTo spec;

139.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

140.        function Get_Bg

141.          (Style      : Gtk_StyleTo API docTo spec;

142.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_ColorTo API docTo specTo body renames Get_BackgroundTo API docTo specTo body;

143.        --  Set or get the background color that this style uses in the given state

145.        procedure Set_Background_GCTo API docTo body

146.          (Style      : Gtk_StyleTo API docTo spec;

147.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

148.           GC         : Gdk.GC.Gdk_GCTo API docTo spec);

149.        procedure Set_Background

150.          (Style      : Gtk_StyleTo API docTo spec;

151.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

152.           GC         : Gdk_GCTo API docTo spec) renames Set_Background_GCTo API docTo specTo body;

153.        procedure Set_Bg

154.          (Style      : Gtk_StyleTo API docTo spec;

155.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

156.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Background_GCTo API docTo specTo body;

157.        procedure Set_Bg_GC

158.          (Style      : Gtk_StyleTo API docTo spec;

159.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

160.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Background_GCTo API docTo specTo body;

161.        function Get_Background_GCTo API docTo body

162.          (Style      : Gtk_StyleTo API docTo spec;

163.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

164.        function Get_Bg

165.          (Style      : Gtk_StyleTo API docTo spec;

166.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Background_GCTo API docTo specTo body;

167.        function Get_Background

168.          (Style      : Gtk_StyleTo API docTo spec;

169.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Background_GCTo API docTo specTo body;

170.        function Get_Bg_GC

171.          (Style      : Gtk_StyleTo API docTo spec;

172.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Background_GCTo API docTo specTo body;

173.        --  Set or get the graphic context that the style is using for the

174.        --  background

176.        procedure Set_ForegroundTo API docTo body

177.          (Style      : Gtk_StyleTo API docTo spec;

178.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

179.           ColorTo API docTo body      : Gdk.Color.Gdk_ColorTo API docTo specTo body);

180.        procedure Set_Fg

181.          (Style      : Gtk_StyleTo API docTo spec;

182.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

183.           Color      : Gdk.Color.Gdk_ColorTo API docTo specTo body) renames Set_ForegroundTo API docTo specTo body;

184.        function Get_ForegroundTo API docTo body

185.          (Style      : Gtk_StyleTo API docTo spec;

186.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

187.        function Get_Fg

188.          (Style      : Gtk_StyleTo API docTo spec;

189.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_ColorTo API docTo specTo body renames Get_ForegroundTo API docTo specTo body;

190.        --  Set or get the foreground color that the style is using

192.        procedure Set_Foreground_GCTo API docTo body

193.          (Style      : Gtk_StyleTo API docTo spec;

194.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

195.           GC         : Gdk.GC.Gdk_GCTo API docTo spec);

196.        procedure Set_Fg_GC

197.          (Style      : Gtk_StyleTo API docTo spec;

198.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

199.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Foreground_GCTo API docTo specTo body;

200.        procedure Set_Foreground

201.          (Style      : Gtk_StyleTo API docTo spec;

202.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

203.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Foreground_GCTo API docTo specTo body;

204.        procedure Set_Fg

205.          (Style      : Gtk_StyleTo API docTo spec;

206.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

207.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Foreground_GCTo API docTo specTo body;

208.        function Get_Foreground_GCTo API docTo body

209.          (Style      : Gtk_StyleTo API docTo spec;

210.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

211.        function Get_Foreground

212.          (Style      : Gtk_StyleTo API docTo spec;

213.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Foreground_GCTo API docTo specTo body;

214.        function Get_Fg

215.          (Style      : Gtk_StyleTo API docTo spec;

216.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Foreground_GCTo API docTo specTo body;

217.        function Get_Fg_GC

218.          (Style      : Gtk_StyleTo API docTo spec;

219.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Foreground_GCTo API docTo specTo body;

220.        --  Set or get the graphic context used by this style for the foreground

222.        procedure Set_LightTo API docTo body

223.          (Style      : Gtk_StyleTo API docTo spec;

224.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

225.           ColorTo API docTo body      : Gdk.Color.Gdk_ColorTo API docTo specTo body);

226.        function Get_LightTo API docTo body

227.          (Style      : Gtk_StyleTo API docTo spec;

228.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

229.        procedure Set_Light_GCTo API docTo body

230.          (Style      : Gtk_StyleTo API docTo spec;

231.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

232.           GC         : Gdk.GC.Gdk_GCTo API docTo spec);

233.        function Get_Light_GCTo API docTo body

234.          (Style      : Gtk_StyleTo API docTo spec;

235.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

236.        procedure Set_Light

237.          (Style      : Gtk_StyleTo API docTo spec;

238.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

239.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Light_GCTo API docTo specTo body;

240.        function Get_Light

241.          (Style      : Gtk_StyleTo API docTo spec;

242.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Light_GCTo API docTo specTo body;

243.        --  Set or get the lighter color or graphic context that this style is

244.        --  using. This color is used to draw the shadows around rectangles for

245.        --  instance

247.        procedure Set_DarkTo API docTo body

248.          (Style      : Gtk_StyleTo API docTo spec;

249.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

250.           ColorTo API docTo body      : Gdk.Color.Gdk_ColorTo API docTo specTo body);

251.        procedure Set_Dark_GCTo API docTo body

252.          (Style      : Gtk_StyleTo API docTo spec;

253.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

254.           GC         : Gdk.GC.Gdk_GCTo API docTo spec);

255.        procedure Set_Dark

256.          (Style      : Gtk_StyleTo API docTo spec;

257.           State_Type : Gtk_State_TypeTo API docTo spec;

258.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Dark_GCTo API docTo specTo body;

259.        function Get_DarkTo API docTo body

260.          (Style      : Gtk_StyleTo API docTo spec;

261.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

262.        function Get_Dark_GCTo API docTo body

263.          (Style      : Gtk_StyleTo API docTo spec;

264.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

265.        function Get_Dark

266.          (Style      : Gtk_StyleTo API docTo spec;

267.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Dark_GCTo API docTo specTo body;

268.        --  Set or get the darker color or graphic context that this style is using.

269.        --  This color is used to draw the shadows around rectangles for instance.

271.        procedure Set_MiddleTo API docTo body

272.          (Style      : Gtk_StyleTo API docTo spec;

273.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

274.           ColorTo API docTo body      : Gdk.Color.Gdk_ColorTo API docTo specTo body);

275.        procedure Set_Mid

276.          (Style      : Gtk_StyleTo API docTo spec;

277.           State_Type : Gtk_State_TypeTo API docTo spec;

278.           Color      : Gdk.Color.Gdk_ColorTo API docTo specTo body) renames Set_MiddleTo API docTo specTo body;

279.        function Get_MiddleTo API docTo body

280.          (Style      : Gtk_StyleTo API docTo spec;

281.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

282.        function Get_Mid

283.          (Style      : Gtk_StyleTo API docTo spec;

284.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_ColorTo API docTo specTo body renames Get_MiddleTo API docTo specTo body;

285.        procedure Set_Middle_GCTo API docTo body

286.          (Style      : Gtk_StyleTo API docTo spec;

287.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

288.           GC         : Gdk.GC.Gdk_GCTo API docTo spec);

289.        function Get_Middle_GCTo API docTo body

290.          (Style      : Gtk_StyleTo API docTo spec;

291.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec;

292.        procedure Set_Middle

293.          (Style      : Gtk_StyleTo API docTo spec;

294.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

295.           GC         : Gdk_GCTo API docTo spec) renames Set_Middle_GCTo API docTo specTo body;

296.        function Get_Middle

297.          (Style      : Gtk_StyleTo API docTo spec;

298.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Middle_GCTo API docTo specTo body;

299.        procedure Set_Mid_GC

300.          (Style      : Gtk_StyleTo API docTo spec;

301.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

302.           GC         : Gdk_GCTo API docTo spec) renames Set_Middle_GCTo API docTo specTo body;

303.        function Get_Mid_GC

304.          (Style      : Gtk_StyleTo API docTo spec;

305.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Middle_GCTo API docTo specTo body;

306.        procedure Set_Mid

307.          (Style      : Gtk_StyleTo API docTo spec;

308.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

309.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Middle_GCTo API docTo specTo body;

310.        function Get_Mid

311.          (Style      : Gtk_StyleTo API docTo spec;

312.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Middle_GCTo API docTo specTo body;

313.        --  Set or get the middle color. This color should be between the light and

314.        --  dark colors set above.

316.        procedure Set_TextTo API docTo body

317.          (Style      : Gtk_StyleTo API docTo spec;

318.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

319.           ColorTo API docTo body      : Gdk.Color.Gdk_ColorTo API docTo specTo body);

320.        function Get_TextTo API docTo body

321.          (Style      : Gtk_StyleTo API docTo spec;

322.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

323.        procedure Set_Text_GCTo API docTo body

324.          (Style      : Gtk_StyleTo API docTo spec;

325.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

326.           GC         : Gdk.GC.Gdk_GCTo API docTo spec);

327.        function Get_Text_GCTo API docTo body

328.          (Style      : Gtk_StyleTo API docTo spec;

329.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

330.        procedure Set_Text

331.          (Style      : Gtk_StyleTo API docTo spec;

332.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

333.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Text_GCTo API docTo specTo body;

334.        function Get_Text

335.          (Style      : Gtk_StyleTo API docTo spec;

336.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Text_GCTo API docTo specTo body;

337.        --  Set or get the color to use when drawing text.

339.        procedure Set_BaseTo API docTo body

340.          (Style      : Gtk_StyleTo API docTo spec;

341.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

342.           ColorTo API docTo body      : Gdk.Color.Gdk_ColorTo API docTo specTo body);

343.        function Get_BaseTo API docTo body

344.          (Style      : Gtk_StyleTo API docTo spec;

345.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

346.        procedure Set_Base_GCTo API docTo body

347.          (Style      : Gtk_StyleTo API docTo spec;

348.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

349.           GC         : Gdk.GC.Gdk_GCTo API docTo spec);

350.        function Get_Base_GCTo API docTo body

351.          (Style      : Gtk_StyleTo API docTo spec;

352.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

353.        procedure Set_Base

354.          (Style      : Gtk_StyleTo API docTo spec;

355.           State_Type : Enums.Gtk_State_TypeTo API docTo spec;

356.           GC         : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Base_GCTo API docTo specTo body;

357.        function Get_Base

358.          (Style      : Gtk_StyleTo API docTo spec;

359.           State_Type : Gtk_State_TypeTo API docTo spec) return Gdk_GCTo API docTo spec renames Get_Base_GCTo API docTo specTo body;

360.        --  Set or get the base color

362.        procedure Set_BlackTo API docTo body

363.          (Style : Gtk_StyleTo API docTo spec;

364.           ColorTo API docTo body : Gdk.Color.Gdk_ColorTo API docTo specTo body);

365.        function Get_BlackTo API docTo body (Style : Gtk_StyleTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

366.        procedure Set_Black_GCTo API docTo body (Style : Gtk_StyleTo API docTo spec; GC : Gdk.GC.Gdk_GCTo API docTo spec);

367.        function Get_Black_GCTo API docTo body (Style : Gtk_StyleTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

368.        procedure Set_Black

369.          (Style : Gtk_StyleTo API docTo spec; GC : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_Black_GCTo API docTo specTo body;

370.        function Get_Black

371.          (Style : Gtk_StyleTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec renames Get_Black_GCTo API docTo specTo body;

372.        --  Set or get the "black" color. It isn't necessarily black, although most

373.        --  themes will want to use black here.

375.        procedure Set_WhiteTo API docTo body (Style : Gtk_StyleTo API docTo spec; ColorTo API docTo body : Gdk.Color.Gdk_ColorTo API docTo specTo body);

376.        function Get_WhiteTo API docTo body (Style : Gtk_StyleTo API docTo spec) return Gdk.Color.Gdk_ColorTo API docTo specTo body;

377.        procedure Set_White_GCTo API docTo body (Style : Gtk_StyleTo API docTo spec; GC : Gdk.GC.Gdk_GCTo API docTo spec);

378.        function Get_White_GCTo API docTo body (Style : Gtk_StyleTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec;

379.        procedure Set_White

380.          (Style : Gtk_StyleTo API docTo spec; GC : Gdk.GC.Gdk_GCTo API docTo spec) renames Set_White_GCTo API docTo specTo body;

381.        function Get_White

382.          (Style : Gtk_StyleTo API docTo spec) return Gdk.GC.Gdk_GCTo API docTo spec renames Get_White_GCTo API docTo specTo body;

383.        --  Set or get the "white" color. It isn't necessarily white, although most

384.        --  themes will want to use white here.

386.        procedure Set_Font_DescriptionTo API docTo body

387.          (Style : Gtk_StyleTo API docTo spec; Desc : Pango.Font.Pango_Font_DescriptionTo API docTo spec);

388.        function Get_Font_DescriptionTo API docTo body

389.          (Style : Gtk_StyleTo API docTo spec) return Pango.Font.Pango_Font_DescriptionTo API docTo spec;

390.        --  Set or get the font to use for this style

392.        --  <doc_ignore>

393.        function Get_FontTo API docTo body (Style : Gtk_StyleTo API docTo spec) return Gdk.Font.Gdk_FontTo API docTo spec;

394.        pragma Obsolescent ("Use Get_Font_Description");  --  Get_Font

395.        --  </doc_ignore>

397.        procedure Set_Bg_PixmapTo API docTo body

398.          (Style      : Gtk_StyleTo API docTo spec;

399.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec;

400.           Pixmap     : Gdk.Pixmap.Gdk_PixmapTo API docTo spec);

401.        function Get_Bg_PixmapTo API docTo body

402.          (Style      : Gtk_StyleTo API docTo spec;

403.           State_TypeTo API docTo body : Enums.Gtk_State_TypeTo API docTo spec) return Gdk.Pixmap.Gdk_PixmapTo API docTo spec;

404.        --  Set or get the pixmap to use for background

406.        function X_ThicknessTo API docTo body (Style : Gtk_StyleTo API docTo spec) return GintTo API docTo spec;

407.        --  Width of the vertical scrollbars and ranges when Style is applied.

408.        --  In fact, this thickness is used for a lot of widgets whose width

409.        --  does not depend on their content, such as rulers,...

411.        function Y_ThicknessTo API docTo body (Style : Gtk_StyleTo API docTo spec) return GintTo API docTo spec;

412.        --  Height of the horizontal scrollbars and ranges when Style is applied.

414.        --------------

415.        -- Painting --

416.        --------------

417.        --  All the subprograms below have similar profiles.

418.        --  Area is always a clipping area. Drawing only takes place within that

419.        --  area, and pixels outside of it are not affected.

420.        --  Detail is a theme-specific detail string. This is generally provided by

421.        --  the application (or rather gtk+ itself) to indicate that the drawing

422.        --  should be slightly different, and Detail describes the exact contact.

423.        --  All drawings are done on Window. Widget is used to draw specific

424.        --  things depending on the widget type.

426.        procedure Draw_Insertion_CursorTo API docTo body

427.          (Widget     : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

428.           Drawable   : Gdk_DrawableTo API docTo spec;

429.           AreaTo API docTo body       : Gdk.Rectangle.Gdk_RectangleTo API docTo spec;

430.           LocationTo API docTo body   : Gdk.Rectangle.Gdk_RectangleTo API docTo spec;

431.           Is_Primary : Boolean;

432.           DirectionTo API docTo body  : Gtk_Text_DirectionTo API docTo spec;

433.           Draw_Arrow : Boolean);

434.        --  Draws a text caret on Drawable at Location. This is not a style function

435.        --  but merely a convenience function for drawing the standard cursor shape.

436.        --  Is_Primary indicates whether the cursor should be the primary cursor

437.        --  color. Direction is the text direction. Draw_Arrow should be true to

438.        --  draw a directional arrow on the cursor. Should be False unless the

439.        --  cursor is split.

441.        procedure Paint_HandleTo API docTo body

442.          (Style               : Gtk_StyleTo API docTo spec;

443.           Window              : Gdk.Gdk_WindowTo API docTo spec;

444.           State_TypeTo API docTo body          : Gtk.Enums.Gtk_State_TypeTo API docTo spec;

445.           Shadow_TypeTo API docTo body         : Gtk.Enums.Gtk_Shadow_TypeTo API docTo spec;

446.           AreaTo API docTo body                : Gdk.Rectangle.Gdk_RectangleTo API docTo spec;

447.           Widget              : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

448.           Detail              : String := "paned";

449.           X, Y, Width, Height : GintTo API docTo spec;

450.           OrientationTo API docTo body         : Gtk.Enums.Gtk_OrientationTo API docTo spec);

451.        --  Paint the handles as is done in the Gtk_Paned widget (ie a series of

452.        --  small dots in Window, that indicate that Window can be manipulated and

453.        --  resized.

454.        --  If Detail is "paned", only a few dots are painted in the middle of

455.        --  window (aligned either horizontally or vertically depending on

456.        --  Orientation). Any other value for Detail draws points on the whole

457.        --  length of Window.

458.        --  (X, Y, Width, Height) is the area in which the dots should be painted.

459.        --  For the whole window, use (0, 0, -1, -1).

460.        --  Only the area that intersect Area is drawn.

462.        procedure Paint_ArrowTo API docTo body

463.          (Style       : access Gtk_Style_RecordTo API docTo spec;

464.           Window      : Gdk_WindowTo API docTo spec;

465.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

466.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

467.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

468.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

469.           Detail      : String := "";

470.           Arrow_TypeTo API docTo body  : Gtk_Arrow_TypeTo API docTo spec;

471.           Fill        : Boolean;

472.           X           : GintTo API docTo spec;

473.           Y           : GintTo API docTo spec;

474.           Width       : GintTo API docTo spec;

475.           Height      : GintTo API docTo spec);

476.        --  Draws an arrow in the given rectangle on Window using the given

477.        --  parameters. Arrow_Type determines the direction of the arrow.

478.        --  The default theme engine only recognazied "menu_scroll_arrow_up" for

479.        --  Detail.

481.        procedure Paint_BoxTo API docTo body

482.          (Style       : access Gtk_Style_RecordTo API docTo spec;

483.           Window      : Gdk_WindowTo API docTo spec;

484.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

485.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

486.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

487.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

488.           Detail      : String := "";

489.           X           : GintTo API docTo spec;

490.           Y           : GintTo API docTo spec;

491.           Width       : GintTo API docTo spec;

492.           Height      : GintTo API docTo spec);

493.        --  Draws a box on Window with the given parameters.

494.        --  The default theme engine recognizes the following for Detail:

495.        --  "spinbutton_up", "spinbutton_down", "paned", "optionmenu"

497.        procedure Paint_Box_GapTo API docTo body

498.          (Style       : access Gtk_Style_RecordTo API docTo spec;

499.           Window      : Gdk_WindowTo API docTo spec;

500.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

501.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

502.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

503.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

504.           Detail      : String := "";

505.           X           : GintTo API docTo spec;

506.           Y           : GintTo API docTo spec;

507.           Width       : GintTo API docTo spec;

508.           Height      : GintTo API docTo spec;

509.           Gap_SideTo API docTo body    : Gtk_Position_TypeTo API docTo spec;

510.           Gap_X       : GintTo API docTo spec;

511.           Gap_Width   : GintTo API docTo spec);

512.        --  Draws a box in Window using the given style and state and shadow type,

513.        --  leaving a gap in one side.

515.        procedure Paint_CheckTo API docTo body

516.          (Style       : access Gtk_Style_RecordTo API docTo spec;

517.           Window      : Gdk_WindowTo API docTo spec;

518.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

519.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

520.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

521.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

522.           Detail      : String := "";

523.           X           : GintTo API docTo spec;

524.           Y           : GintTo API docTo spec;

525.           Width       : GintTo API docTo spec;

526.           Height      : GintTo API docTo spec);

527.        --  Draws a check button indicator in the given rectangle on Window with

528.        --  the given parameters. The default theme handles the following values for

529.        --  detail: "cellcheck", "check"

531.        procedure Paint_DiamondTo API docTo body

532.          (Style       : access Gtk_Style_RecordTo API docTo spec;

533.           Window      : Gdk_WindowTo API docTo spec;

534.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

535.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

536.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

537.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

538.           Detail      : String := "";

539.           X           : GintTo API docTo spec;

540.           Y           : GintTo API docTo spec;

541.           Width       : GintTo API docTo spec;

542.           Height      : GintTo API docTo spec);

543.        --  Draws a diamond in the given rectangle on Window using the given

544.        --  parameters.

546.        procedure Paint_ExpanderTo API docTo body

547.          (Style          : access Gtk_Style_RecordTo API docTo spec;

548.           Window         : Gdk_WindowTo API docTo spec;

549.           State_TypeTo API docTo body     : Gtk_State_TypeTo API docTo spec;

550.           AreaTo API docTo body           : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

551.           Widget         : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

552.           Detail         : String := "";

553.           X              : GintTo API docTo spec;

554.           Y              : GintTo API docTo spec;

555.           Expander_StyleTo API docTo body : Gtk_Expander_StyleTo API docTo spec);

556.        --  Draws an expander as used in Gtk_Tree_View. X and Y specify the center

557.        --  the expander. The size of the expander is determined by the

558.        --  "expander-size" style property of Widget. (If widget is not specified or

559.        --  doesn't have an "expander-size" property, an unspecified default size

560.        --  will be used, since the caller doesn't have sufficient information to

561.        --  position the expander, this is likely not useful.) The expander is

562.        --  expander_size pixels tall in the collapsed position and expander_size

563.        --  pixels wide in the expanded position.

565.        procedure Paint_ExtensionTo API docTo body

566.          (Style       : access Gtk_Style_RecordTo API docTo spec;

567.           Window      : Gdk_WindowTo API docTo spec;

568.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

569.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

570.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

571.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

572.           Detail      : String := "";

573.           X           : GintTo API docTo spec;

574.           Y           : GintTo API docTo spec;

575.           Width       : GintTo API docTo spec;

576.           Height      : GintTo API docTo spec;

577.           Gap_SideTo API docTo body    : Gtk_Position_TypeTo API docTo spec);

578.        --  Draws an extension, i.e. a notebook tab.

580.        procedure Paint_Flat_BoxTo API docTo body

581.          (Style       : access Gtk_Style_RecordTo API docTo spec;

582.           Window      : Gdk_WindowTo API docTo spec;

583.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

584.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

585.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

586.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

587.           Detail      : String := "";

588.           X           : GintTo API docTo spec;

589.           Y           : GintTo API docTo spec;

590.           Width       : GintTo API docTo spec;

591.           Height      : GintTo API docTo spec);

592.        --  Draws a flat box on Window with the given parameters.

594.        procedure Paint_FocusTo API docTo body

595.          (Style      : access Gtk_Style_RecordTo API docTo spec;

596.           Window     : Gdk_WindowTo API docTo spec;

597.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

598.           AreaTo API docTo body       : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

599.           Widget     : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

600.           Detail     : String := "";

601.           X          : GintTo API docTo spec;

602.           Y          : GintTo API docTo spec;

603.           Width      : GintTo API docTo spec;

604.           Height     : GintTo API docTo spec);

605.        --  Draws a focus indicator around the given rectangle on Window using the

606.        --  given style.

608.        procedure Paint_HlineTo API docTo body

609.          (Style      : access Gtk_Style_RecordTo API docTo spec;

610.           Window     : Gdk_WindowTo API docTo spec;

611.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

612.           AreaTo API docTo body       : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

613.           Widget     : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

614.           Detail     : String := "";

615.           X1         : GintTo API docTo spec;

616.           X2         : GintTo API docTo spec;

617.           Y          : GintTo API docTo spec);

618.        --  Draws a horizontal line from (X1, Y) to (X2, Y) in Window

619.        --  using the given style and state.

621.        procedure Paint_LayoutTo API docTo body

622.          (Style      : access Gtk_Style_RecordTo API docTo spec;

623.           Window     : Gdk_WindowTo API docTo spec;

624.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

625.           Use_Text   : Boolean;

626.           AreaTo API docTo body       : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

627.           Widget     : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

628.           Detail     : String := "";

629.           X          : GintTo API docTo spec;

630.           Y          : GintTo API docTo spec;

631.           Layout     : Pango.Layout.Pango_LayoutTo API docTo spec);

632.        --  Draws a layout on Window using the given parameters.

634.        procedure Paint_OptionTo API docTo body

635.          (Style       : access Gtk_Style_RecordTo API docTo spec;

636.           Window      : Gdk_WindowTo API docTo spec;

637.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

638.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

639.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

640.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

641.           Detail      : String := "";

642.           X           : GintTo API docTo spec;

643.           Y           : GintTo API docTo spec;

644.           Width       : GintTo API docTo spec;

645.           Height      : GintTo API docTo spec);

646.        --  Draws a radio button indicator in the given rectangle on Window with

647.        --  the given parameters.

649.        procedure Paint_PolygonTo API docTo body

650.          (Style       : access Gtk_Style_RecordTo API docTo spec;

651.           Window      : Gdk_WindowTo API docTo spec;

652.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

653.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

654.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

655.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

656.           Detail      : String := "";

657.           Points      : Gdk.Types.Gdk_Points_ArrayTo API docTo spec;

658.           Fill        : Boolean);

659.        --  Draws a polygon on Window with the given parameters.

661.        procedure Paint_Resize_GripTo API docTo body

662.          (Style      : access Gtk_Style_RecordTo API docTo spec;

663.           Window     : Gdk_WindowTo API docTo spec;

664.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

665.           AreaTo API docTo body       : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

666.           Widget     : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

667.           Detail     : String := "";

668.           EdgeTo API docTo body       : Gdk.Window.Gdk_Window_EdgeTo API docTo spec;

669.           X          : GintTo API docTo spec;

670.           Y          : GintTo API docTo spec;

671.           Width      : GintTo API docTo spec;

672.           Height     : GintTo API docTo spec);

673.        --  Draws a resize grip in the given rectangle on Window using the given

674.        --  parameters.

676.        procedure Paint_ShadowTo API docTo body

677.          (Style       : access Gtk_Style_RecordTo API docTo spec;

678.           Window      : Gdk_WindowTo API docTo spec;

679.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

680.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

681.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

682.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

683.           Detail      : String := "";

684.           X           : GintTo API docTo spec;

685.           Y           : GintTo API docTo spec;

686.           Width       : GintTo API docTo spec;

687.           Height      : GintTo API docTo spec);

688.        --  Draws a shadow around the given rectangle in Window using the given

689.        --  style and state and shadow type.

691.        procedure Paint_Shadow_GapTo API docTo body

692.          (Style       : access Gtk_Style_RecordTo API docTo spec;

693.           Window      : Gdk_WindowTo API docTo spec;

694.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

695.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

696.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

697.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

698.           Detail      : String := "";

699.           X           : GintTo API docTo spec;

700.           Y           : GintTo API docTo spec;

701.           Width       : GintTo API docTo spec;

702.           Height      : GintTo API docTo spec;

703.           Gap_SideTo API docTo body    : Gtk_Position_TypeTo API docTo spec;

704.           Gap_X       : GintTo API docTo spec;

705.           Gap_Width   : GintTo API docTo spec);

706.        --  Draws a shadow around the given rectangle in Window

707.        --  using the given style and state and shadow type, leaving a

708.        --  gap in one side.

710.        procedure Paint_SliderTo API docTo body

711.          (Style       : access Gtk_Style_RecordTo API docTo spec;

712.           Window      : Gdk_WindowTo API docTo spec;

713.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

714.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

715.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

716.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

717.           Detail      : String := "";

718.           X           : GintTo API docTo spec;

719.           Y           : GintTo API docTo spec;

720.           Width       : GintTo API docTo spec;

721.           Height      : GintTo API docTo spec;

722.           OrientationTo API docTo body : Gtk_OrientationTo API docTo spec);

723.        --  Draws a slider in the given rectangle on Window using the given style

724.        --  and orientation.

726.        procedure Paint_TabTo API docTo body

727.          (Style       : access Gtk_Style_RecordTo API docTo spec;

728.           Window      : Gdk_WindowTo API docTo spec;

729.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

730.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

731.           AreaTo API docTo body        : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

732.           Widget      : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

733.           Detail      : String := "";

734.           X           : GintTo API docTo spec;

735.           Y           : GintTo API docTo spec;

736.           Width       : GintTo API docTo spec;

737.           Height      : GintTo API docTo spec);

738.        --  Draws an option menu tab (i.e. the up and down pointing arrows) in the

739.        --  given rectangle on Window using the given parameters.

741.        procedure Paint_VlineTo API docTo body

742.          (Style      : access Gtk_Style_RecordTo API docTo spec;

743.           Window     : Gdk_WindowTo API docTo spec;

744.           State_TypeTo API docTo body : Gtk_State_TypeTo API docTo spec;

745.           AreaTo API docTo body       : Gdk.Rectangle.Gdk_RectangleTo API docTo spec := Gdk.Rectangle.Full_AreaTo API docTo specTo body;

746.           Widget     : access Glib.Object.GObject_RecordTo API docTo specTo body'Class;

747.           Detail     : String := "";

748.           Y1         : GintTo API docTo spec;

749.           Y2         : GintTo API docTo spec;

750.           X          : GintTo API docTo spec);

751.        --  Draws a vertical line from (X, Y1) to (X, Y2) in Window

752.        --  using the given style and state.

754.        -------------

755.        -- Drawing --

756.        -------------

757.        --  All these procedures are obsolescent, and have been replaced by the

758.        --  Paint_* versions below.

759.        --  <doc_ignore>

761.        procedure Draw_PolygonTo API docTo body

762.          (Style       : Gtk_StyleTo API docTo spec;

763.           Window      : Gdk.Window.Gdk_WindowTo API docTo spec;

764.           State_TypeTo API docTo body  : Enums.Gtk_State_TypeTo API docTo spec;

765.           Shadow_TypeTo API docTo body : Enums.Gtk_Shadow_TypeTo API docTo spec;

766.           Points      : Gdk.Types.Gdk_Points_ArrayTo API docTo spec;

767.           Fill        : Boolean);

768.        pragma Obsolescent ("Use Paint_Polygon");  --  Draw_Polygon

769.        --  Draws a polygon in Window

771.        procedure Draw_ArrowTo API docTo body

772.          (Style       : Gtk_StyleTo API docTo spec;

773.           Window      : Gdk.Window.Gdk_WindowTo API docTo spec;

774.           State_TypeTo API docTo body  : Enums.Gtk_State_TypeTo API docTo spec;

775.           Shadow_TypeTo API docTo body : Enums.Gtk_Shadow_TypeTo API docTo spec;

776.           Arrow_TypeTo API docTo body  : Enums.Gtk_Arrow_TypeTo API docTo spec;

777.           Fill        : Boolean;

778.           X, Y        : GintTo API docTo spec;

779.           Width       : GintTo API docTo spec;

780.           Height      : GintTo API docTo spec);

781.        pragma Obsolescent ("Use Pain_Arrow");  --  Draw_Arrow

782.        --  Draws an arrow in Window, within the given rectangle

784.        procedure Draw_ShadowTo API docTo body

785.          (Style       : access Gtk_Style_RecordTo API docTo spec;

786.           Window      : Gdk_WindowTo API docTo spec;

787.           State_TypeTo API docTo body  : Gtk_State_TypeTo API docTo spec;

788.           Shadow_TypeTo API docTo body : Gtk_Shadow_TypeTo API docTo spec;

789.           X           : GintTo API docTo spec;

790.           Y           : GintTo API docTo spec;

791.           Width       : GintTo API docTo spec;

792.           Height      : GintTo API docTo spec);

793.        pragma Obsolescent;  --  Draw_Shadow

794.        --  Draws a shadow around the given rectangle in @window

795.        --  using the given style and state and shadow type.

797.        procedure Draw_StringTo API docTo body

798.          (Style       : Gtk_StyleTo API docTo spec;

799.           Window      : Gdk.Window.Gdk_WindowTo API docTo spec;

800.           State_TypeTo API docTo body  : Enums.Gtk_State_TypeTo API docTo spec;

801.           X, Y        : GintTo API docTo spec;

802.           Str         : UTF8_StringTo API docTo spec);

803.        pragma Obsolescent ("Use Paint_String");  --  Draw_String

804.        --  Draws a text on Window

806.        --  </doc_ignore>

808.        -------------

809.        -- Borders --

810.        -------------

812.        type Gtk_Border_Record is record

813.           Left   : GintTo API docTo spec;

814.           Right  : GintTo API docTo spec;

815.           Top    : GintTo API docTo spec;

816.           Bottom : GintTo API docTo spec;

817.        end record;

818.        pragma Convention (C, Gtk_Border_RecordTo API docTo spec);

819.        type Gtk_Border is access all Gtk_Border_RecordTo API docTo spec;

821.        function Border_CopyTo API docTo body (Border : access Gtk_Border_RecordTo API docTo spec) return Gtk_BorderTo API docTo spec;

822.        --  Copies a Gtk_Border structure.

824.        procedure Border_FreeTo API docTo body (Border : access Gtk_Border_RecordTo API docTo spec);

825.        --  Frees a Gtk_Border structure.

827.        function Border_Get_TypeTo API docTo body return GTypeTo API docTo spec;

829.        -------------

830.        -- Signals --

831.        -------------

833.        --  <signals>

834.        --  The following new signals are defined for this widget:

835.        --

836.        --  - "realize"

837.        --    procedure Handler (Style : access Gtk_Style_Record'Class);

838.        --    Emitted when the style has been initialized for a particular colormap

839.        --    and depth. Connecting to this signal is probably seldom useful since

840.        --    most of the time applications and widgets only deal with styles that

841.        --    have been already realized.

842.        --

843.        --  - "unrealize"

844.        --    procedure Handler (Style : access Gtk_Style_Record'Class);

845.        --    Emitted when the aspects of the style specific to a particular

846.        --    colormap and depth are being cleaned up. A connection to this signal

847.        --    can be useful if a widget wants to cache objects like a Gdk_GC as

848.        --    object data on Gtk_Style. This signal provides a convenient place to

849.        --    free such cached objects.

850.        --

851.        --  </signals>

853.        Signal_Realize   : constant Glib.Signal_NameTo API docTo spec := "realize";

854.        Signal_Unrealize : constant Glib.Signal_NameTo API docTo spec := "unrealize";

856.     private

857.        pragma Import (C, Get_TypeTo API docTo spec, "gtk_style_get_type");

858.     end Gtk.StyleTo API docTo specTo body;

860.     --  The following subprograms never had a binding, and are now obsolescent:

861.     --  No binding: gtk_draw_box

862.     --  No binding: gtk_draw_box_gap

863.     --  No binding: gtk_draw_check

864.     --  No binding: gtk_draw_diamond

865.     --  No binding: gtk_draw_expander

866.     --  No binding: gtk_draw_extension

867.     --  No binding: gtk_draw_flat_box

868.     --  No binding: gtk_draw_focus

869.     --  No binding: gtk_draw_handle

870.     --  No binding: gtk_draw_hline

871.     --  No binding: gtk_draw_layout

872.     --  No binding: gtk_draw_option

873.     --  No binding: gtk_draw_resize_grip

874.     --  No binding: gtk_draw_shadow_gap

875.     --  No binding: gtk_draw_slider

876.     --  No binding: gtk_draw_tab

877.     --  No binding: gtk_draw_vline

878.     --  No binding: gtk_paint_string

879.     --  No binding: gtk_style_set_font

881.     --  These are obsolescent, and inherited anyway

882.     --  No binding: gtk_style_ref

883.     --  No binding: gtk_style_unref

885.     --  Binding is in gtk-icon_factory.ads

886.     --  No binding: gtk_style_lookup_icon_set

887.     --  No binding: gtk_style_render_icon