Vaya, ahora entiendo el porque de tal combinación de colores.
Para lo que necesitas debes dibujar tú mismo las pestañas. Pon la propiedad OwnerDraw del PageControl en true y en el evento OnDrawTab pon algo parecido a esto:
Código Delphi
[-]
var
R: TRect;
Texto: String;
begin
Control.Canvas.Brush.Color := clBlack;
Control.Canvas.Font.Color := clRed;
Texto := PageControl1.Pages[TabIndex].Caption;
R := Rect;
Control.Canvas.FillRect(R);
if not Active then
InflateRect(R, 0, -3);
DrawText(Control.Canvas.Handle, PChar(Texto), -1, R, DT_SINGLELINE or DT_CENTER or DT_VCENTER);
end;
Aún así te queda un pequeño borde gris alrededor de la ficha pero prueba a ver si te sirve.
// Saludos