Wenn ich eine 60 Zeichen breite Caption eines TabSheet lösche, bewirkt Destroy nur die Löschung eines Teils der Caption. Ich habe die Unit zum Erzeugen und Löschen der Tabsheets mit CloseButton angehängt (der Code zum Löschen selbst besteht ja nur aus einem Wort). Der Effekt ist zu sehen, wenn man
- die Anwendung startet
- mit dem Button "NewTab" ein weiteres TabSheet hinzufügt
- das mittlere TabSheet schließt.
Dann bleiben 13 Zeichen weiter sichtbar.
Der Effekt tritt nicht auf, wenn man die offenen Tabs von rechts nach links schließt.
Hat PageControl einen Bug oder hat mein Code einen Bug?

Ja, das ist ein Fehler in TPageControl, wenn du OwnerDraw nutzt. Um das zu lösen genügt es DoubleBuffered des Formulars auf True zu setzen.

Als Alternative gibt es Lösungen wie diese, die auch noch gleich viel mehr und besser können:
code.google.com/p/delphi-chrome-tabs/

Danke für den Tipp. Jetzt klappt's.