• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    迪恩网络公众号

DELPHI关于Style的几点

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

Delphi xe2以前的样式或风格编辑器叫vcl Style 之后改为 BMP Style,同时支持VCL和FMX,Delphi本身的设计是超前的,在多年后其他的语言或环境里才有类似的技术,比如微软的WPF的XMAL相关思想,以及android Studio 相关的界面方案。

这里提到的是这个配置怎么生效,在IDE模式下如果是App(各种含界面的应用),直接在应用程序选项中的“Appearance”-外貌中选择即可。

但是如果界面包含在动态库 比如dll中就没有这个选项了!

Google、百度、Bing之后统一的结论是可以的!

https://www.e-learn.cn/topic/2650756

https://stackoverflow.com/questions/9703309/vcl-styles-embedded-in-dll

总结:

观察正常的exe 文件的项目配置文件即 .dproj文件,是不是平时不在意呀!在属性组 <PropertyGroup Condition="'$(Base)'!=''">

<Custom_Styles>Sky|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Sky.vsf;Obsidian|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Obsidian.vsf;Silver|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Silver.vsf</Custom_Styles>

将该句相关内容更写到 Dll 的 .dproj文件中,可能是如下形式。

这样在系统编译时样式资源就打到程序里面了!

DLL中用对应的样式资源的!

即在初始化段或Create中指定样式,并断开与主应用的关系,据说不断开会AV。

TStyleManager.TrySetStyle('Sky', False);
TCustomStyleEngine.UnRegisterSysStyleHook('#32768', TSysPopupStyleHook);

运行后的效果(说明主窗体是Obsidian,插件窗体是Sky)

                                                    ---End---


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
理解 Delphi 的类(十) - 深入方法[19] - 过程中的方法发布时间:2022-07-18
下一篇:
delphi时间查询发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap