TTabsheet.Caption zur laufzeit ändern ?

[richard_boderich]

Hallo Leute, hab eine komisches Problem.
Ich moechte zur Laufzeit mit folgendem Code
die Bezeichnung des Tabsheets aendern, klappt bei mir
aber nicht, das Beschriftungsfeld im entsprechende sheet, bleibt
leer, alle anderen sheet's, haben die korrekte Bezeichnung, die
ich zur Entwurfszeit definiert hab.

vielleicht kann jemand helfen?

Delphi-Quellcode:

procedure TForm1.OpenDialog1Close(Sender: TObject);
begin
tabsheet1.caption:=Dateiname;
pagecontrol1.show;
end;