File: gtk-about_dialog.ads

------------------------------------------------------------------------------

--                                                                          --

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

--                     Copyright (C) 2000-2014, AdaCore                     --

--                                                                          --

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

-- under terms of the  GNU General Public License  as published by the Free --

-- Software  Foundation;  either version 3,  or (at your  option) any later --

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

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

-- TABILITY or FITNESS FOR A PARTICULAR PURPOSE.                            --

--                                                                          --

-- As a special exception under Section 7 of GPL version 3, you are granted --

-- additional permissions described in the GCC Runtime Library Exception,   --

-- version 3.1, as published by the Free Software Foundation.               --

--                                                                          --

-- You should have received a copy of the GNU General Public License and    --

-- a copy of the GCC Runtime Library Exception along with this program;     --

-- see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see    --

-- <http://www.gnu.org/licenses/>.                                          --

--                                                                          --

------------------------------------------------------------------------------

```
 
```
```
--  <description> 
```

--  The GtkAboutDialog offers a simple way to display information about a

--  program like its logo, name, copyright, website and license. It is also

--  possible to give credits to the authors, documenters, translators and

--  artists who have worked on the program. An about dialog is typically opened

--  when the user selects the 'About' option from the 'Help' menu. All parts of

```
--  the dialog are optional. 
```
```
-- 
```

--  About dialog often contain links and email addresses. GtkAboutDialog

--  displays these as clickable links. By default, it calls gtk_show_uri() when

--  a user clicks one. The behaviour can be overridden with the

--  Gtk.About_Dialog.Gtk_About_Dialog::activate-link signal.

```
-- 
```

--  To make constructing a GtkAboutDialog as convenient as possible, you can

--  use the function gtk_show_about_dialog which constructs and shows a dialog

--  and keeps it around so that it can be shown again.

```
-- 
```

--  Note that GTK+ sets a default title of '_("About %s")' on the dialog

--  window (where %s is replaced by the name of the application, but in order

--  to ensure proper translation of the title, applications should set the

--  title property explicitly when constructing a GtkAboutDialog, as shown in

```
--  the following example: 
```
```
-- 
```
```
--    gtk_show_about_dialog (NULL, 
```

--       "program-name", "ExampleCode",

```
--       "logo", example_logo, 
```

--       "title" _("About ExampleCode"),

```
--       NULL); 
```
```
-- 
```

--  It is also possible to show a Gtk.About_Dialog.Gtk_About_Dialog like any

--  other Gtk.Dialog.Gtk_Dialog, e.g. using Gtk.Dialog.Run. In this case, you

--  might need to know that the 'Close' button returns the GTK_RESPONSE_CANCEL

```
--  response id. 
```
```
-- 
```
```
--  </description> 
```
```
--  <group>Windows</group> 
```

--  <testgtk>create_about.adb</testgtk>

```
pragma Ada_2005; 
```
```
 
```

pragma Warnings (Off, "*is already use-visible*");

with GNAT.Strings;            use GNAT.Strings;

with Gdk.PixbufTo API doc
To spec
To body;              use Gdk.PixbufTo API doc
To spec
To body;

with GlibTo API doc
To spec
To body;                    use GlibTo API doc
To spec
To body;

with Glib.Generic_PropertiesTo API doc
To spec
To body; use Glib.Generic_PropertiesTo API doc
To spec
To body;

with Glib.ObjectTo API doc
To spec
To body;             use Glib.ObjectTo API doc
To spec
To body;

with Glib.PropertiesTo API doc
To spec
To body;         use Glib.PropertiesTo API doc
To spec
To body;

with Glib.TypesTo API doc
To spec
To body;              use Glib.TypesTo API doc
To spec
To body;

with Gtk.BuildableTo API doc
To spec
To body;           use Gtk.BuildableTo API doc
To spec
To body;

with Gtk.DialogTo API doc
To spec
To body;              use Gtk.DialogTo API doc
To spec
To body;

```
 
```

package Gtk.About_DialogTo API doc
To spec
To body is

```
 
```

   type Gtk_About_Dialog_Record is new Gtk_Dialog_RecordTo API doc
To spec with null record;

   type Gtk_About_Dialog is access all Gtk_About_Dialog_RecordTo API doc
To spec'Class;

```
 
```
```
   type Gtk_License is ( 
```
```
      License_Unknown, 
```
```
      License_Custom, 
```
```
      License_Gpl_2_0, 
```
```
      License_Gpl_3_0, 
```
```
      License_Lgpl_2_1, 
```
```
      License_Lgpl_3_0, 
```
```
      License_Bsd, 
```
```
      License_Mit_X11, 
```
```
      License_Artistic); 
```

   pragma Convention (C, Gtk_LicenseTo API doc
To spec);

   --  The type of license for an application.

```
   -- 
```

   --  This enumeration can be expanded at later date.

```
 
```
```
   ---------------------------- 
```
```
   -- Enumeration Properties -- 
```
```
   ---------------------------- 
```
```
 
```
```
   package Gtk_License_Properties is 
```

      new Generic_Internal_Discrete_PropertyTo API doc
To spec
To body (Gtk_LicenseTo API doc
To spec);

   type Property_Gtk_License is new Gtk_License_Properties.PropertyTo API doc
To spec;

```
 
```
```
   ------------------ 
```
```
   -- Constructors -- 
```
```
   ------------------ 
```
```
 
```

   procedure Gtk_NewTo API doc
To body (About : out Gtk_About_DialogTo API doc
To spec);

   procedure InitializeTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec'Class);

   --  Creates a new Gtk.About_Dialog.Gtk_About_Dialog.

```
   --  Since: gtk+ 2.6 
```
```
 
```

   function Gtk_About_Dialog_NewTo API doc
To body return Gtk_About_DialogTo API doc
To spec;

   --  Creates a new Gtk.About_Dialog.Gtk_About_Dialog.

```
   --  Since: gtk+ 2.6 
```
```
 
```

   function Get_TypeTo API doc
To body return Glib.GTypeTo API doc
To spec;

   pragma Import (C, Get_TypeTo API doc
To spec, "gtk_about_dialog_get_type");

```
 
```
```
   ------------- 
```
```
   -- Methods -- 
```
```
   ------------- 
```
```
 
```

   procedure Add_Credit_SectionTo API doc
To body

      (About        : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Section_Name : UTF8_StringTo API doc
To spec;

       People       : GNAT.Strings.String_List);

   --  Creates a new section in the Credits page.

```
   --  Since: gtk+ 3.4 
```

   --  "section_name": The name of the section

   --  "people": The people who belong to that section

```
 
```

   function Get_ArtistsTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec)

       return GNAT.Strings.String_List;

   --  Returns the string which are displayed in the artists tab of the

```
   --  secondary credits dialog. 
```
```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_ArtistsTo API doc
To body

      (About   : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Artists : GNAT.Strings.String_List);

   --  Sets the strings which are displayed in the artists tab of the

```
   --  secondary credits dialog. 
```
```
   --  Since: gtk+ 2.6 
```

   --  "artists": a null-terminated array of strings

```
 
```

   function Get_AuthorsTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec)

       return GNAT.Strings.String_List;

   --  Returns the string which are displayed in the authors tab of the

```
   --  secondary credits dialog. 
```
```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_AuthorsTo API doc
To body

      (About   : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Authors : GNAT.Strings.String_List);

   --  Sets the strings which are displayed in the authors tab of the

```
   --  secondary credits dialog. 
```
```
   --  Since: gtk+ 2.6 
```

   --  "authors": a null-terminated array of strings

```
 
```

   function Get_CommentsTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

```
   --  Returns the comments string. 
```
```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_CommentsTo API doc
To body

      (About    : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Comments : UTF8_StringTo API doc
To spec := "");

   --  Sets the comments string to display in the about dialog. This should be

   --  a short string of one or two lines.

```
   --  Since: gtk+ 2.6 
```
```
   --  "comments": a comments string 
```
```
 
```

   function Get_CopyrightTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

```
   --  Returns the copyright string. 
```
```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_CopyrightTo API doc
To body

      (About     : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Copyright : UTF8_StringTo API doc
To spec := "");

   --  Sets the copyright string to display in the about dialog. This should

   --  be a short string of one or two lines.

```
   --  Since: gtk+ 2.6 
```

   --  "copyright": the copyright string

```
 
```

   function Get_DocumentersTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec)

       return GNAT.Strings.String_List;

   --  Returns the string which are displayed in the documenters tab of the

```
   --  secondary credits dialog. 
```
```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_DocumentersTo API doc
To body

      (About       : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Documenters : GNAT.Strings.String_List);

   --  Sets the strings which are displayed in the documenters tab of the

```
   --  secondary credits dialog. 
```
```
   --  Since: gtk+ 2.6 
```

   --  "documenters": a null-terminated array of strings

```
 
```

   function Get_LicenseTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

   --  Returns the license information.

```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_LicenseTo API doc
To body

      (About   : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       License : UTF8_StringTo API doc
To spec := "");

   --  Sets the license information to be displayed in the secondary license

   --  dialog. If License is null, the license button is hidden.

```
   --  Since: gtk+ 2.6 
```

   --  "license": the license information or null

```
 
```

   function Get_License_TypeTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return Gtk_LicenseTo API doc
To spec;

   --  Retrieves the license set using Gtk.About_Dialog.Set_License_Type

```
   --  Since: gtk+ 3.0 
```
```
 
```

   procedure Set_License_TypeTo API doc
To body

      (About        : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       License_TypeTo API doc
To body : Gtk_LicenseTo API doc
To spec);

   --  Sets the license of the application showing the About dialog from a

```
   --  list of known licenses. 
```

   --  This function overrides the license set using

```
   --  Gtk.About_Dialog.Set_License. 
```
```
   --  Since: gtk+ 3.0 
```

   --  "license_type": the type of license

```
 
```
```
   function Get_LogoTo API doc
To body 
```

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec)

       return Gdk.Pixbuf.Gdk_PixbufTo API doc
To spec;

   --  Returns the pixbuf displayed as logo in the about dialog.

```
   --  Since: gtk+ 2.6 
```
```
 
```
```
   procedure Set_LogoTo API doc
To body 
```

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Logo  : access Gdk.Pixbuf.Gdk_Pixbuf_RecordTo API doc
To spec
To body'Class);

   --  Sets the pixbuf to be displayed as logo in the about dialog. If it is

   --  null, the default window icon set with Gtk.Window.Set_Default_Icon will

```
   --  be used. 
```
```
   --  Since: gtk+ 2.6 
```

   --  "logo": a Gdk.Pixbuf.Gdk_Pixbuf, or null

```
 
```

   function Get_Logo_Icon_NameTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

   --  Returns the icon name displayed as logo in the about dialog.

```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_Logo_Icon_NameTo API doc
To body

      (About     : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Icon_Name : UTF8_StringTo API doc
To spec := "");

   --  Sets the pixbuf to be displayed as logo in the about dialog. If it is

   --  null, the default window icon set with Gtk.Window.Set_Default_Icon will

```
   --  be used. 
```
```
   --  Since: gtk+ 2.6 
```

   --  "icon_name": an icon name, or null

```
 
```

   function Get_Program_NameTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

   --  Returns the program name displayed in the about dialog.

```
   --  Since: gtk+ 2.12 
```
```
 
```

   procedure Set_Program_NameTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Name  : UTF8_StringTo API doc
To spec);

   --  Sets the name to display in the about dialog. If this is not set, it

   --  defaults to g_get_application_name.

```
   --  Since: gtk+ 2.12 
```
```
   --  "name": the program name 
```
```
 
```

   function Get_Translator_CreditsTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

   --  Returns the translator credits string which is displayed in the

   --  translators tab of the secondary credits dialog.

```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_Translator_CreditsTo API doc
To body

      (About              : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Translator_Credits : UTF8_StringTo API doc
To spec := "");

   --  Sets the translator credits string which is displayed in the

   --  translators tab of the secondary credits dialog.

   --  The intended use for this string is to display the translator of the

   --  language which is currently used in the user interface. Using gettext, a

   --  simple way to achieve that is to mark the string for translation: |[

   --  gtk_about_dialog_set_translator_credits (about,

   --  _("translator-credits")); ]| It is a good idea to use the customary

   --  msgid "translator-credits" for this purpose, since translators will

   --  already know the purpose of that msgid, and since

   --  Gtk.About_Dialog.Gtk_About_Dialog will detect if "translator-credits" is

```
   --  untranslated and hide the tab. 
```
```
   --  Since: gtk+ 2.6 
```

   --  "translator_credits": the translator credits

```
 
```

   function Get_VersionTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

```
   --  Returns the version string. 
```
```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_VersionTo API doc
To body

      (About   : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Version : UTF8_StringTo API doc
To spec := "");

   --  Sets the version string to display in the about dialog.

```
   --  Since: gtk+ 2.6 
```
```
   --  "version": the version string 
```
```
 
```

   function Get_WebsiteTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

```
   --  Returns the website URL. 
```
```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_WebsiteTo API doc
To body

      (About   : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Website : UTF8_StringTo API doc
To spec := "");

   --  Sets the URL to use for the website link.

```
   --  Since: gtk+ 2.6 
```

   --  "website": a URL string starting with "http://"

```
 
```

   function Get_Website_LabelTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return UTF8_StringTo API doc
To spec;

   --  Returns the label used for the website link.

```
   --  Since: gtk+ 2.6 
```
```
 
```

   procedure Set_Website_LabelTo API doc
To body

      (About         : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Website_Label : UTF8_StringTo API doc
To spec);

   --  Sets the label to be used for the website link.

```
   --  Since: gtk+ 2.6 
```

   --  "website_label": the label used for the website link

```
 
```

   function Get_Wrap_LicenseTo API doc
To body

      (About : not null access Gtk_About_Dialog_RecordTo API doc
To spec) return Boolean;

   --  Returns whether the license text in About is automatically wrapped.

```
   --  Since: gtk+ 2.8 
```
```
 
```

   procedure Set_Wrap_LicenseTo API doc
To body

      (About        : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

```
       Wrap_License : Boolean); 
```

   --  Sets whether the license text in About is automatically wrapped.

```
   --  Since: gtk+ 2.8 
```

   --  "wrap_license": whether to wrap the license

```
 
```
```
   ---------------- 
```
```
   -- Properties -- 
```
```
   ---------------- 
```

   --  The following properties are defined for this widget. See

   --  Glib.Properties for more information on properties)

```
 
```

   Artists_Property : constant Glib.Properties.Property_StringTo API doc
To spec :=

   Glib.Properties.BuildTo API doc
To spec
To body ("artists");--  Unknown type: unspecified

```
 
```

   Authors_Property : constant Glib.Properties.Property_StringTo API doc
To spec :=

   Glib.Properties.BuildTo API doc
To spec
To body ("authors");--  Unknown type: unspecified

```
 
```

   Documenters_Property : constant Glib.Properties.Property_StringTo API doc
To spec :=

   Glib.Properties.BuildTo API doc
To spec
To body ("documenters");--  Unknown type: unspecified

```
 
```

   Comments_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  Comments about the program. This string is displayed in a label in the

   --  main dialog, thus it should be a short explanation of the main purpose

   --  of the program, not a detailed list of features.

```
 
```

   Copyright_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  Copyright information for the program.

```
 
```

   License_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  The license of the program. This string is displayed in a text view in

   --  a secondary dialog, therefore it is fine to use a long multi-paragraph

   --  text. Note that the text is only wrapped in the text view if the

   --  "wrap-license" property is set to True; otherwise the text itself must

   --  contain the intended linebreaks. When setting this property to a

   --  non-null value, the Gtk.About_Dialog.Gtk_About_Dialog:license-type

   --  property is set to Gtk.About_Dialog.License_Custom as a side effect.

```
 
```

   License_Type_Property : constant Gtk.About_Dialog.Property_Gtk_LicenseTo API doc
To spec;

```
   --  Type: Gtk_License 
```

   --  The license of the program, as a value of the GtkLicense enumeration.

```
   -- 
```

   --  The Gtk.About_Dialog.Gtk_About_Dialog will automatically fill out a

   --  standard disclaimer and link the user to the appropriate online resource

```
   --  for the license text. 
```
```
   -- 
```

   --  If Gtk.About_Dialog.License_Unknown is used, the link used will be the

   --  same specified in the Gtk.About_Dialog.Gtk_About_Dialog:website

```
   --  property. 
```
```
   -- 
```

   --  If Gtk.About_Dialog.License_Custom is used, the current contents of the

   --  Gtk.About_Dialog.Gtk_About_Dialog:license property are used.

```
   -- 
```

   --  For any other Gtk.About_Dialog.Gtk_License value, the contents of the

   --  Gtk.About_Dialog.Gtk_About_Dialog:license property are also set by this

```
   --  property as a side effect. 
```
```
 
```

   Logo_Property : constant Glib.Properties.Property_ObjectTo API doc
To spec;

```
   --  Type: Gdk.Pixbuf.Gdk_Pixbuf 
```

   --  A logo for the about box. If this is not set, it defaults to

   --  Gtk.Window.Get_Default_Icon_List.

```
 
```

   Logo_Icon_Name_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  A named icon to use as the logo for the about box. This property

   --  overrides the Gtk.About_Dialog.Gtk_About_Dialog:logo property.

```
 
```

   Program_Name_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  The name of the program. If this is not set, it defaults to

```
   --  g_get_application_name. 
```
```
 
```

   Translator_Credits_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  Credits to the translators. This string should be marked as

   --  translatable. The string may contain email addresses and URLs, which

   --  will be displayed as links, see the introduction for more details.

```
 
```

   Version_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

```
   --  The version of the program. 
```
```
 
```

   Website_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  The URL for the link to the website of the program. This should be a

```
   --  string starting with "http://. 
```
```
 
```

   Website_Label_Property : constant Glib.Properties.Property_StringTo API doc
To spec;

   --  The label for the link to the website of the program.

```
 
```

   Wrap_License_Property : constant Glib.Properties.Property_BooleanTo API doc
To spec;

   --  Whether to wrap the text in the license dialog.

```
 
```
```
   ------------- 
```
```
   -- Signals -- 
```
```
   ------------- 
```
```
 
```

   type Cb_Gtk_About_Dialog_UTF8_String_Boolean is not null access function

     (Self : access Gtk_About_Dialog_RecordTo API doc
To spec'Class;

      URI  : UTF8_StringTo API doc
To spec) return Boolean;

```
 
```

   type Cb_GObject_UTF8_String_Boolean is not null access function

     (Self : access Glib.Object.GObject_RecordTo API doc
To spec
To body'Class;

      URI  : UTF8_StringTo API doc
To spec) return Boolean;

```
 
```

   Signal_Activate_Link : constant Glib.Signal_NameTo API doc
To spec := "activate-link";

   procedure On_Activate_LinkTo API doc
To body

      (Self  : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Call  : Cb_Gtk_About_Dialog_UTF8_String_BooleanTo API doc
To spec;

```
       After : Boolean := False); 
```

   procedure On_Activate_LinkTo API doc
To body

      (Self  : not null access Gtk_About_Dialog_RecordTo API doc
To spec;

       Call  : Cb_GObject_UTF8_String_BooleanTo API doc
To spec;

       Slot  : not null access Glib.Object.GObject_RecordTo API doc
To spec
To body'Class;

```
       After : Boolean := False); 
```

   --  The signal which gets emitted to activate a URI. Applications may

   --  connect to it to override the default behaviour, which is to call

```
   --  gtk_show_uri(). 
```
```
   --  
```
```
   --  Callback parameters: 
```

   --    --  "uri": the URI that is activated

   --    --  Returns True if the link has been activated

```
 
```
```
   ---------------- 
```
```
   -- Interfaces -- 
```
```
   ---------------- 
```

   --  This class implements several interfaces. See Glib.Types

```
   -- 
```
```
   --  - "Buildable" 
```
```
 
```

   package Implements_Gtk_Buildable is new Glib.Types.ImplementsTo API doc
To spec
To body

     (Gtk.Buildable.Gtk_BuildableTo API doc
To spec, Gtk_About_Dialog_RecordTo API doc
To spec, Gtk_About_DialogTo API doc
To spec);

```
   function "+" 
```

     (Widget : access Gtk_About_Dialog_RecordTo API doc
To spec'Class)

   return Gtk.Buildable.Gtk_BuildableTo API doc
To spec

   renames Implements_Gtk_Buildable.To_InterfaceTo API doc
To spec
To body;

```
   function "-" 
```

     (Interf : Gtk.Buildable.Gtk_BuildableTo API doc
To spec)

   return Gtk_About_DialogTo API doc
To spec

   renames Implements_Gtk_Buildable.To_ObjectTo API doc
To spec
To body;

```
 
```
```
private 
```

   Wrap_License_PropertyTo API doc
To spec : constant Glib.Properties.Property_BooleanTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("wrap-license");

   Website_Label_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("website-label");

   Website_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("website");

   Version_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("version");

   Translator_Credits_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("translator-credits");

   Program_Name_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("program-name");

   Logo_Icon_Name_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("logo-icon-name");

   Logo_PropertyTo API doc
To spec : constant Glib.Properties.Property_ObjectTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("logo");

   License_Type_PropertyTo API doc
To spec : constant Gtk.About_Dialog.Property_Gtk_LicenseTo API doc
To spec :=

     Gtk.About_Dialog.BuildTo API doc
To spec
To body ("license-type");

   License_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("license");

   Copyright_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("copyright");

   Comments_PropertyTo API doc
To spec : constant Glib.Properties.Property_StringTo API doc
To spec :=

     Glib.Properties.BuildTo API doc
To spec
To body ("comments");

end Gtk.About_DialogTo API doc
To spec
To body;

Documentation