Zitat von
khh:
procedure DrawTab(TabIndex: Integer; const Rect: TRect; Active: Boolean); override;
PBPageControl.pas(75,22) Error: Duplicate identifier "TabIndex"
Benenn die Parameter mal um: ATabIndex, ARect, AActive. Dann kommst du bestimmt zum nächsten Fehler.