Moin Homer,
ich hab' mal Deine Doppelposts gelöscht
Wenn Du mal die Prozedur Procedure ProgressBar_GU so einbauen würdest
Delphi-Quellcode:
type
TForm1 = class(TForm) // Ich weiss nicht, wie Dein Hauptformular heisst
Procedure ProgressBar_GU(....);
//...
implementation
//...
Procedure TForm1.ProgressBar_GU(.....);
begin
end;
dann könntest Du auch self benutzen.
Das Beispiel von mir funzt eigentlich einwandfrei. Mir ist jetzt nicht ganz klar wieso das bei Dir nicht geht.
Vielleicht könntest Du mal den kompletten Source hier ranhängen, denn ich komm' auch ein wenig mit Deinen Benennungen ins Schleudern.
Wenn pb_f von Typ TProgressBar_Form ist, was ist dann Progressbar_form???