关于PageControl控件的问题.

Question

使TabVisible不可现，自已做按钮控制页面。
呵呵，乱想的。

Answer 1

不如用SpeedButton+Notebook!
如何？

Answer 2

但这样的话，Tab的Caption就看不见了，你可以用一个Label替换，甚至用Image来替换，这样就更个性了，呵呵。

Answer 3

To Bob7946:
把PageControl的OwnerDraw设为True,然后呢?

Answer 4

把PageControl的OwnerDraw设为True ,在onDrawTab事件中自己写
下面的例子在tab前加上了一个小图标procedure TForm1.pgcMainDrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
var B:TBitmap;
begin
B:=TBitmap.Create;
Control.Canvas.Brush.Color:=$00CEE8CA;
Control.Canvas.FillRect(Rect);
Control.Canvas.Font.Color:=clBlack;
Control.Canvas.Font.Charset:=GB2312_CHARSET;
Control.Canvas.Font.Size:=9;
Control.Canvas.Font.Name:='宋体';
Control.Canvas.TextOut(Rect.Left+20,Rect.Top+4,TPageControl(Control).Pages[TabIndex].Caption);
imgControl12.GetBitmap(TabIndex,B);
B.Transparent:=true;
Control.Canvas.Draw(Rect.Left+3,Rect.Top+4,B);
end;

Answer 5

To yancey:
你的方法可以用,但是Header的左上方和右上方会有两个很难看的点.请问怎样把他们去掉?