我想改变PAGECONTROL得标题条上的字体该怎么办？

Question

上面的兄弟，你最好自己试一下在发帖子！
你这样改在设计时即可做，可是只是改变pagecontrol上控件的字体，TAB的标题根本没反应

Answer 1

有Canvas吗?有就画上!没有的就从它的父类继承,自己写个mypagecontrol!:)

Answer 2

将PageControl的OnwerDraw设为True,在OnDrawTab中画各Tab的文字。 
procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
begin
  if Active then Control.Canvas.Font.Color:=clRed;
  Control.Canvas.TextOut(rect.left+4,rect.top+4,PageControl1.Pages[TabIndex].Caption);
end;

Answer 3

建议换控件，我现在也不能一个一个地试，
但有的就是不能变，
如BUTTON的也不能，

Answer 4

伙计，我想改变所有的TAB页面