为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 获取 设置文件时间

Delphi 系统任务栏 窗口状态显示进度

Delphi利用系统环境变量获取常用系统目录

Delphi控制word添加多行文字

Delphi xe 分割字符串太方便了

Delphi listview用法

Delphi xe android的所有权限按照分类总结说明

Delphi 中的split 函数

Delphi 清空文件夹

Delphi 不用控件用函数实现发email

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



打赏

取消

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

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

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

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

评论

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