Hallo messie,
loesche die Tabsheets von "hinten nach vorne". Andernfalls versucht die Schleife auf Elemente zuzugreifen, die nicht mehr existieren:
Delphi-Quellcode:
for i := PageControl.PageCount-1 downto 0 do
PageControl.Pages[i].Free;
Greetz
alcaeus