Delphi 控制台程序加图标方法

Delphi 很完美的支持 控制台程序但是用他真的是比较麻烦不像有那么多的属性今天我们来

设置它的控制台图标方法看看

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

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

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

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

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