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>