type Gtk_Progress_Bar_Record is new Gtk.Progress.Gtk_Progress_Record with private;
type Gtk_Progress_Bar_Orientation is (Progress_Left_To_Right, Progress_Right_To_Left, Progress_Bottom_To_Top, Progress_Top_To_Bottom);
type Gtk_Progress_Bar is access all Gtk_Progress_Bar_Record'Class;
Orientation_Property : constant Gtk.Enums.Property_Gtk_Orientation;
Discrete_Blocks_Property : constant Glib.Properties.Property_Uint;
Fraction_Property : constant Glib.Properties.Property_Double;
Pulse_Step_Property : constant Glib.Properties.Property_Double;
Text_Property : constant Glib.Properties.Property_String;
procedure Gtk_New
( | Progress_Bar | : out Gtk_Progress_Bar); |
procedure Initialize
( | Progress_Bar | : access Gtk_Progress_Bar_Record'Class); |
function Get_Type return Gtk.Gtk_Type;
procedure Pulse
( | Progress_Bar | : access Gtk_Progress_Bar_Record); |
procedure Set_Text
( | Progress_Bar | : access Gtk_Progress_Bar_Record; |
Text | : UTF8_String); |
function Get_Text
( | Progress_Bar | : access Gtk_Progress_Bar_Record) return UTF8_String; |
procedure Set_Fraction
( | Progress_Bar | : access Gtk_Progress_Bar_Record; |
Fraction | : Gdouble); |
function Get_Fraction
( | Progress_Bar | : access Gtk_Progress_Bar_Record) return Gdouble; |
procedure Set_Pulse_Step
( | Progress_Bar | : access Gtk_Progress_Bar_Record; |
Step | : Gdouble); |
function Get_Pulse_Step
( | Progress_Bar | : access Gtk_Progress_Bar_Record) return Gdouble; |
procedure Set_Orientation
( | Progress_Bar | : access Gtk_Progress_Bar_Record; |
Orientation | : Gtk_Progress_Bar_Orientation); |
function Get_Orientation
( | Progress_Bar | : access Gtk_Progress_Bar_Record) return Gtk_Progress_Bar_Orientation; |
procedure Set_Ellipsize
( | Pbar | : access Gtk_Progress_Bar_Record; |
Mode | : Pango.Layout.Pango_Ellipsize_Mode); |
function Get_Ellipsize
( | Pbar | : access Gtk_Progress_Bar_Record) return Pango.Layout.Pango_Ellipsize_Mode; |
Binding from C File version 2.8.17
<testgtk>create_progress.adb</testgtk>