Sers,
hier das Erstellen von TTabSheets
Delphi-Quellcode:
//...
const
....
var
mynewtab: TTabSheet;
x: integer;
begin
mynewtab:=TTabSheet.Create(Self);
mynewtab.PageControl := PageControl1;
mynewtab.name:=smc(Listview2.Items[cindex].caption);
....
end;
Und die Freigabe:
with TTabSheet(FindComponent({Name der Komponenten})) do free;
Hoffe es hilft...
Das Erstellen der TPageControl geht analog zur Erstellen der TabSheets, nur die properties müssen natürlich anders gesetzt werden...
have fun with the details...
Peter