Source position: gtkprogress.pp line 28
procedure set_show_text(
var a: TGtkProgress;
__show_text: guint
);