Source position: gtkprogress.pp line 30
procedure set_activity_mode(
var a: TGtkProgress;
__activity_mode: guint
);