package Gtk.Font_Chooser is
type Gtk_Font_Chooser is new Glib.Types.GType_Interface;
type Gtk_Font_Filter_Func is access function (Family : not null access Pango.Font_Family.Pango_Font_Family_Record'Class; Face : not null access Pango.Font_Face.Pango_Font_Face_Record'Class) return Boolean;
type Cb_Gtk_Font_Chooser_UTF8_String_Void is not null access procedure (Self : Gtk_Font_Chooser; Fontname : UTF8_String);
type Cb_GObject_UTF8_String_Void is not null access procedure (Self : access Glib.Object.GObject_Record'Class; Fontname : UTF8_String);
Null_Gtk_Font_Chooser : constant Gtk_Font_Chooser;
Font_Property : constant Glib.Properties.Property_String;
Font_Desc_Property : constant Pango.Font.Property_Font_Description;
Preview_Text_Property : constant Glib.Properties.Property_String;
Show_Preview_Entry_Property : constant Glib.Properties.Property_Boolean;
Signal_Font_Activated : constant Glib.Signal_Name := "font-activated";
function Get_Type return Glib.GType;
function Get_Font
( | Self | : Gtk_Font_Chooser) return UTF8_String; |
procedure Set_Font
( | Self | : Gtk_Font_Chooser; |
Fontname | : UTF8_String); |
function Get_Font_Desc
( | Self | : Gtk_Font_Chooser) return Pango.Font.Pango_Font_Description; |
procedure Set_Font_Desc
( | Self | : Gtk_Font_Chooser; |
Font_Desc | : Pango.Font.Pango_Font_Description); |
function Get_Font_Face
( | Self | : Gtk_Font_Chooser) return Pango.Font_Face.Pango_Font_Face; |
function Get_Font_Family
( | Self | : Gtk_Font_Chooser) return Pango.Font_Family.Pango_Font_Family; |
function Get_Font_Size
( | Self | : Gtk_Font_Chooser) return Gint; |
function Get_Preview_Text
( | Self | : Gtk_Font_Chooser) return UTF8_String; |
procedure Set_Preview_Text
( | Self | : Gtk_Font_Chooser; |
Text | : UTF8_String); |
function Get_Show_Preview_Entry
( | Self | : Gtk_Font_Chooser) return Boolean; |
procedure Set_Show_Preview_Entry
( | Self | : Gtk_Font_Chooser; |
Show_Preview_Entry | : Boolean); |
procedure Set_Filter_Func
( | Self | : Gtk_Font_Chooser; |
Filter | : Gtk_Font_Filter_Func); |
procedure On_Font_Activated
( | Self | : Gtk_Font_Chooser; |
Call | : Cb_Gtk_Font_Chooser_UTF8_String_Void; | |
After | : Boolean := False); |
procedure On_Font_Activated
( | Self | : Gtk_Font_Chooser; |
Call | : Cb_GObject_UTF8_String_Void; | |
Slot | : not null access Glib.Object.GObject_Record'Class; | |
After | : Boolean := False); |
function "+"
( | W | : Gtk_Font_Chooser) return Gtk_Font_Chooser; |