VCL样式 - 仅皮肤一个控件

时间:2015-10-09 05:00:56

标签: delphi vcl vcl-styles

我只想使用vcl样式为我的表单上的一个单一控件设置外观/样式,并将其余部分保留为Windows默认值。

在这个例子中,我想为TButton组件设置外观。

这是我的表格:

enter image description here

应用VCL风格后,我得到:

enter image description here

但我想要的是:

enter image description here

IDE附带的Bitmap-Style-Designer似乎不允许指定皮肤控件,所以可能有一个"技巧"这样做?

1 个答案:

答案 0 :(得分:2)

VCL样式是应用程序的全局样式。因此,您可以尝试为所有控件禁用VCL样式,除了按钮显示方式here(此方法有一些限制),或者甚至更好,您可以自己绘制按钮使用VCL样式的外观和感觉都是如此。

var
  LStyleServices : TCustomStyleServices;
begin
  LStyleServices:=TStyleManager.Style['AnyLoadedVclStyle'];
  //draw the button with using LStyleServices 

  ....       
end;