Page control- kolorki buttonów

Czy istnieje możliwość w komponencie TPageControl zmiany kolorów przycisków za pomącą któych przełączamy sie do poszczególnych zakładek ??

Poprzez OwnerDraw. Zdarzenie OnDrawButton, czy jakoś podobnie.

A czy mógłby ktoś podać jakiś przykład ??

procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
var
  i: Integer;
begin
  case TabIndex of
    0: i := clRed;
    1: i := clBlue;
    2: i := clGreen;
  end;

  with PageControl1 do
  begin
    Canvas.Brush.Color := i;
    Canvas.Rectangle(Rect.Left, Rect.Top, Rect.Right, Rect.Bottom);
  end;
end;