Hallo ich erzeuge während mein Programm läuft ein TabbedNotebook, und zwar so:
Delphi-Quellcode:
...
var i : integer;
tabi : TTabbedNotebook;
seiten : Tstringlist;
...
seiten := TStringList.Create;
tabi := TTabbedNotebook.Create(self);
for i := 1 to 3 do
seiten.Add('Seite' + inttostr(i));
with tabi do
begin
Parent := panel1;
SetBounds(1, 1, 150, 150);
visible := true;
pages := seiten;
end;
Nun möchte ich dort in eine bestimmte Seite ein Label o.ä. machen, aber was soll ich als parent des Labels angeben, so funktioniert nicht:
label1.Parent := tabi;