PageControl重画问题，各位高手请进！(100)

Delphi自带的TPageControl太难看了，所以想自己重画一下，设置了OwnerDraw=true,然后在OnDrawTab事件中写重画代码，这样重画效果没什么问题了，现在还有个问题不知道如何解决，请教各位大侠： 1、有时候PageControl不会执行重画，比如用拖动另外一个程序从有PageControl控件的程序通过的时候，PageControl被那个拖动的程序挡住的部分就会变成未重画之前的样子，不会重画，必须要把窗体的尺寸拉大或拉小才会重画，请问应该怎么去解决这个问题呢？

为什么要重画呢放个TPageControl 隐藏 Tab然后搞个图片做Tab

程序中已经N多模块使用到了TPageControl控件，没办法一个一个模块去改成图片式的，太耗时了，所以想通过重画的方式美化一下

TPageControl重画问题自己解决了！另外问个问题，我想重画MainMenu菜单，顶栏菜单右边空白的部分区域怎么画呢，怎么去获取顶栏菜单空白部分的区域Rect？应该在哪个事件中去重画这部分呢？|-------------------------------------------------------------------------|| 文件 编辑 帮助 ( 我想把顶栏菜单这空白的部分也重画 )|| ------------------------------------------------------------------------|| 打开 复制 帮助文档 || 新建 粘帖 关于 || 保存 ||

高手呢？？