Oder doch nicht. Wieder schneller gepostet, als getestet. Diesmal ist es ein Laufzeitfehler.
"Der Objectverweiß wurde nicht auf eine Objectinstanz festegelgt"
Delphi-Quellcode:
function Hauptfenster.getLabel : String;
begin
result := Label1.Text; //hier
end;
procedure Hauptfenster.SetLabel(lab : String);
begin
Label1.Text := lab; // oder hier
end;