在VCL应用程序中禁用样式

Question

我在我的应用程序中添加了一个VCL样式，但我也给了用户一个选项来关闭它，但我无法弄清楚如何在运行时全局执行此操作。

设置“TStyleManager.AutoDiscoverStyleResources：= false”几乎可以正常工作，但会弹出一条错误消息，说“找不到样式{样式集}”但是在解除消息之后就完全符合我的要求。

我希望这段代码可以工作，但不会......

if (not ParamObj.UseDarkStyle) then
begin
  //TStyleManager.AutoDiscoverStyleResources := false;
  TStyleManager.SetStyle(TStyleManager.SystemStyle);
end;

我也试过（最初）

TStyleManager.TrySetStyle('Windows');

但这也行不通。

我试过“Application.Initialize;”这两方面没有区别

我错过了什么？ 提前致谢， 马丁

Answer 1

找到解决方案。在初始化代码中还有一个TStyleManager.TrySetStyle，我没有注意到它将它重置为黑暗风格。