## Documentation

Table of Contents
Class Inheritance Tree
Widget Screenshots
Package groups

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

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

3.     --                                                                   --

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

5.     --                Copyright (C) 2000-2006 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 special type of data set displays itself with bar (also known

32.     --  as histograms).

33.     --  </description>

34.     --  <c_version>gtkextra 2.1.1</c_version>

35.     --  <group>Plotting Data</group>

37.     with Gtk.Extra.Plot_DataTo API docTo specTo body;

38.     with Gtk.EnumsTo API docTo specTo body;

40.     package Gtk.Extra.Plot_BarTo API docTo specTo body is

42.        type Gtk_Plot_Bar_RecordTo API docTo body is new Gtk.Extra.Plot_Data.Gtk_Plot_Data_RecordTo API docTo specTo body

43.          with private;

44.        type Gtk_Plot_Bar is access all Gtk_Plot_Bar_RecordTo API docTo specTo body'Class;

46.        procedure Gtk_NewTo API docTo body

47.          (Bar         : out Gtk_Plot_BarTo API docTo spec;

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

49.        --  Create a new Plot bar.

51.        procedure InitializeTo API docTo body

52.          (Bar         : access Gtk_Plot_Bar_RecordTo API docTo specTo body'Class;

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

54.        --  Internal initialization function.

55.        --  See the section "Creating your own widgets" in the documentation.

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

58.        --  Return the internal value associated with a Gtk_Bar.

60.        procedure Set_WidthTo API docTo body

61.          (Bar   : access Gtk_Plot_Bar_RecordTo API docTo specTo body'Class;

62.           Width : GdoubleTo API docTo spec);

63.        --  Set the width of the bars

65.        function Get_WidthTo API docTo body (Bar : access Gtk_Plot_Bar_RecordTo API docTo specTo body'Class) return GdoubleTo API docTo spec;

66.        --  Return the width used to draw the bars

68.     private

69.        type Gtk_Plot_Bar_RecordTo API docTo spec is new Gtk.Extra.Plot_Data.Gtk_Plot_Data_RecordTo API docTo specTo body

70.          with null record;

71.        pragma Import (C, Get_TypeTo API docTo spec, "gtk_plot_bar_get_type");

72.     end Gtk.Extra.Plot_BarTo API docTo specTo body;