im TabControl die Buttonfarbe ändern

[Sharky]

Hai silbernes Mondmädchen.

Du könntest auch OwnerDraw := True einstellung dann die Tabs selber zeichnen:

Delphi-Quellcode:

procedure TForm1.TabControl1DrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
begin
  Control.Canvas.Brush.Color := clGreen;
  Control.Canvas.FillRect(Rect);
  Control.Canvas.TextOut(rect.Left+2,Rect.Top+2,TabControl1.Tabs[TabIndex]);
end;