## Documentation

Table of Contents
Class Inheritance Tree
Widget Screenshots
Package groups

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

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

3.     --                                                                   --

4.     --                Copyright (C) 2001-2002 ACT-Europe                 --

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.     --  <group>Pango, font handling</group>

31.     with GlibTo API docTo specTo body;

32.     with Glib.ObjectTo API docTo specTo body;

33.     with Pango.FontTo API docTo specTo body;

35.     package Pango.ContextTo API docTo specTo body is

37.        type Pango_Context_RecordTo API docTo body is new Glib.Object.GObject_RecordTo API docTo specTo body with private;

38.        type Pango_Context is access all Pango_Context_RecordTo API docTo specTo body'Class;

39.        --  A pango context is somewhat similar to a graphic context, and groups all

40.        --  the information on how to handle the various international scripts

41.        --  (font, color, direction,...)

42.        --  Such a context is destroyed by calling Glib.Object.Unref on it.

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

45.        --  Return the internal value associated with a Pango_Context.

47.        procedure Set_Font_DescriptionTo API docTo body

48.          (Context     : Pango_ContextTo API docTo spec;

49.           Description : Pango.Font.Pango_Font_DescriptionTo API docTo spec);

51.        function Get_Font_DescriptionTo API docTo body (Context : Pango_ContextTo API docTo spec)

52.           return Pango.Font.Pango_Font_DescriptionTo API docTo spec;

54.        function Load_FontTo API docTo body

55.          (Context : access Pango_Context_RecordTo API docTo specTo body'Class;

56.           Descr   : Pango.Font.Pango_Font_DescriptionTo API docTo spec)

57.           return Pango.Font.Pango_FontTo API docTo spec;

58.        --  Load a new font from its description

60.     private

61.        type Pango_Context_RecordTo API docTo spec is new Glib.Object.GObject_RecordTo API docTo specTo body

62.          with null record;

63.        pragma Import (C, Get_TypeTo API docTo spec, "pango_context_get_type");

64.     end Pango.ContextTo API docTo specTo body;

66.     --  missing:

67.     --  pango_context_list_families

68.     --  pango_context_load_fontset

69.     --  pango_context_get_metrics

70.     --  pango_context_get_language

71.     --  pango_context_set_language

72.     --  pango_context_set_base_dir

73.     --  pango_context_get_base_dir