为Delphi的控制台程式添加图标


本文整理自网络,侵删。

 一般来说,在delphi中可以通过 Project ?C Options ?C Application 来加载图标,但是有时这个选项是灰掉的,特别在控制台程序中是不可用的。让它出现的方法如下:

在dpr文件uses部分添加 forms
在begin之前添加 {$R *.res}
在运行的部分添加 Application.Initialize;

如果提示没有res文件的话,就自己建立一个,可以随意建立一个空文件用 工程名.res 命名,之后 Load Icon 就变成可用了。你可以注意到在我发布的源码中这些部分已经添加过,只是注释掉了。

这就是说,让 Load Icon 这个按钮不为灰色必须同时满足上面说的4个条件,即3处代码和一个res文件。这样实际上是认为此程序是一个基于Form的程序,而使得这个选项能够被使用。

但是在编译的时候,是否载入res文件则只由 {$R *.res} 是否存在决定,这就是说完全可以在载入图标之后将另外两处代码注释掉。

相关阅读 >>

Delphi winapi: setlayeredwindowattributes - 设置窗口的透明

Delphi 采用 tidhttp 访问 https 的网站,采用 tidtcpclient 访问 https 的网站

Delphi 文本转成图片

Delphi d10.x 安卓app开发中创建密钥库文件

Delphi xe2创建apple ios程序

Delphi idhttp代理设置

Delphi tdbgrideh导出excel

Delphi �c 使用createoleobject后释放olevariant

Delphi 如何设置热键

Delphi adoquery 开启本地缓存

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...