当TabPosition为tpLeft时,TPageControl选项卡显示错误的颜色和样式

时间:2013-02-25 11:45:43

标签: delphi delphi-xe2

首先,我制作了一个新表格并制作了颜色clWhite。然后,我放入TPageControl并添加了2个新页面。一切都很好,一切的背景都是白色(除了非活动标签标题)。但是,然后在页面控件上,我将属性TabPosition更改为tpLeft,并且标签标题更改为默认窗口颜色,而其他所有内容都保持为白色。

TabPosition = tpTop

Tabs on Top

TabPosition = tpLeft

Tabs on Left

当标签位于左侧时,有什么方法可以让它正确显示?

1 个答案:

答案 0 :(得分:2)

内置控件中没有任何内容可以让您更改此行为。实际上,您正在观察的行为是基础Windows控件的设计行为。您可以通过使用TCS_VERTICAL样式创建原始Win32 SysTabControl32控件来轻松验证这一点。因此控件已经正确显示。

如果您真的想要更改外观,则需要自己绘制标签。