Als Alternative kannst Du an deine Procedure auch einfach das TLabel übergeben um welches es geht.
Delphi-Quellcode:
procedure LabelRefresh (aLabel : TLabel; value : Integer);
begin
aLabel.Caption := IntToStr (value);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
LabelRefresh(Label1,10);
end;
Stephan B.
"Lasst den Gänsen ihre Füßchen"