Delphi 10 Seattle - Vista Dialogs与VCL样式的错误

时间:2016-08-19 12:09:22

标签: delphi delphi-10-seattle vcl-styles

我遇到了" Vista Dialogs"在"德尔福10西雅图"昨天。它似乎与某些VCL样式不兼容。 使用" Windows 10 Dark"时出现此错误作为我的应用程序中的默认样式 所以我的直接想法是Vista Dialogs不适用于自定义VCL样式,但使用" Windows"作为默认样式并使用Windows 10作为操作系统,对话框工作正常。

我已经上传了两张照片,其中一张照片显示了视觉错误,另一张没照片,工作得很好。

没有" Windows 10 Dark"应用VCL样式

enter image description here

使用" Windows 10 Dark"应用VCL样式

enter image description here

我已经研究过这个问题,其他帖子中提到了这个错误,但这个错误不是那些帖子的内容...... 任何人都明白为什么会这样?我该如何解决?

1 个答案:

答案 0 :(得分:3)

RAD Studio中包含的VCL Styles版本只能设置经典对话框的样式。如果要完全支持新对话框,则必须使用VCL Styles Utils项目。

只需安装库并将这些单元添加到项目中即可。

uses
  Vcl.Styles.Utils.Menus, //Popup and Shell Menus (class #32768)
  Vcl.Styles.Utils.Forms, //dialogs box (class #32770)
  Vcl.Styles.Utils.StdCtrls, //buttons, static, and so on
  Vcl.Styles.Utils.ComCtrls, //SysTreeView32, SysListView32
  Vcl.Styles.Utils.ScreenTips, //tooltips_class32 class
  Vcl.Styles.Utils.SysControls,
  Vcl.Styles.Utils.SysStyleHook;

enter image description here