Alterar cores do PageControl (Delphi) (Resolvido )

Gostaria de saber se tem como alterar a cor de fundo do page control, e das abas alguém pode me ajudar?

matrix escreveu:

Gostaria de saber se tem como alterar a cor de fundo do page control, e das abas alguém pode me ajudar?

Infelizmente o TPageControl não possui a propriedade para alteração de cor. Mas tem um procedimento que pode servir como alternativa:



Mude a propriedade OwnerDraw para TRUE;
implemente seu método DrawTab da seguinte maneira:


****pinta a fonte

Control.Canvas.Font.Color:=clBlack;

**** pinta a paleta / aba
Control.Canvas.brush.Color:=clSkyBlue;

PageControl1.Canvas.Rectangle(Rect);
Control.Canvas.TextOut(Rect.left+5,Rect.top+3,PageControl1.Pages[tabindex].Caption);

**** pinta a parte interna (tabsheet)
PageControl1.Pages[TabIndex].brush.Color := Control.Canvas.brush.Color;
PageControl1.Pages[TabIndex].Repaint;

espero que seja isto que vc quer.

Obrigado, fiz como vc disse e consegui exatamente o que eu queria.

valeu, valeu mesmo.