Farbe eines Tabsheet Reiters ändern (TPageControl)

[Andidreas]

aloha zusammen,

ich habe auf meiner form ein TPageControl... das hat die farbe weiß...
die reiter der tabsheets haben ein hässliches grau...

wie kann ich hier die farbe ändern?
im forum habe ich schon paar beispiele gefunden... diese funktioniern bei mir aber leider nicht...

hier mal meine prozedur:

Delphi-Quellcode:

procedure Tmain_form.pagectrl_scaleDrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
begin

  WITH Control.Canvas DO
  BEGIN

    tabsheet_scaletest.Brush.Color := clRed;

  END;

end;

ich hoffe ihr könnt mir ein paar tipps geben