关于PageControl的一个问题：(50分)

比如我在PageControl的下边放一个Panel，把Panel的颜色设置为蓝色，
PageControl的TabSheet的面板颜色可以跟随改变，可是上边的按钮的颜色
却还是默认的灰色。把PageControl的属性OnwerDraw改变，能跟着改变颜色了，
可是字和图都显示不出来了。问个位高手，能否解决让PageControl跟随变色?

procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl;
TabIndex: Integer; const Rect: TRect; Active: Boolean);
var
bmp: TBitmap;
begin
bmp := 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);
ImageList1.GetBitmap(TabIndex,bmp);
bmp.Transparent := true;
Control.Canvas.Draw(Rect.Left+3,Rect.Top+4,bmp);
end;

谢谢！我现在这里不能测试。明天加分。

谢谢，分数加上。