Danke Leute,
die property PageControl fehlte, das war alles.
Leider fällt mir jetzt das Nächste auf die Füße. Die PageControl soll neu aufgebaut werden. Dazu müssen alle vorhandenen Tabsheets raus:
Delphi-Quellcode:
for i := 1 to PageControl.PageCount do
begin
PageControl.pages[i-1].Free;
end;
Das gibt es häufig "Listenindex überschreitet..." und es werden nur einige TabSheets gelöscht
