Delphi TTaskDialog可以使用VCLStyles吗？

Question

Delphi TTaskDialog可以使用VCLStyles吗？

Answer 1

我刚刚在VCL Styles Utils库中添加了TTaskDialog支持.

要激活此功能,您需要将这些单元添加到项目中.

• Vcl.Styles.Utils.Forms
• Vcl.Styles.Utils.SysStyleHook
• Vcl.Styles.Utils.SysControls
• Vcl.Styles.Hooks

更多信息可以在这篇博客文章中找到.

Answer 2

AFAIK,正如TLama在他的评论中所说,这TTaskDialog只是直接映射Windows API,你将无法直接进行VCL Style.

但是你可以通过使用类似于本文中描述的关于在TWebBrowser中使用VCL样式的黑客来做到这一点.

我怀疑这可能是一些工作,甚至是不可行的.您必须破解Windows创建的所有组件,这并不容易.Task Dialog API不提供完整而详细的COM接口,有很多回调,可以覆盖,就像TWebBrowser那样.

如果您使用我们的开源任务对话框仿真代码作为开始,您可以强制使用我们的仿真层与纯VCL组件.在这种情况下,使用样式很容易.不要忘记向我们发送反馈和补丁,以便让设备得到改进!我认为其他用户希望获得这么好的功能.这是开源的好处:你开始发布,发布,然后集成贡献,结果变得更好.:)