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

为Delphi控制台程序增加版本信息及图标

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

    当我们使用Delphi创建一个控制台程序时,IDE默认生成一个没有图标没有版本信息的工程,如图:<o:p></o:p>

<v:shapetype o:spt="75" coordsize="21600,21600" filled="f" stroked="f" id="_x0000_t75" path=" [email protected]@5 [email protected]@[email protected]@[email protected]@5 xe" o:preferrelative="t"><v:stroke joinstyle="miter"></v:stroke><v:formulas><v:f eqn="if lineDrawn pixelLineWidth 0 "></v:f><v:f eqn="sum @0 1 0 "></v:f><v:f eqn="sum 0 0 @1 "></v:f><v:f eqn="prod @2 1 2 "></v:f><v:f eqn="prod @3 21600 pixelWidth "></v:f><v:f eqn="prod @3 21600 pixelHeight "></v:f><v:f eqn="sum @0 0 1 "></v:f><v:f eqn="prod @6 1 2 "></v:f><v:f eqn="prod @7 21600 pixelWidth "></v:f><v:f eqn="sum @8 21600 0 "></v:f><v:f eqn="prod @7 21600 pixelHeight "></v:f><v:f eqn="sum @10 21600 0 "></v:f></v:formulas><v:path o:extrusionok="f" o:connecttype="rect" gradientshapeok="t"></v:path><o:lock v:ext="edit" aspectratio="t"></o:lock></v:shapetype><v:shape coordsize="21600,21600" id="_x0000_i1025" type="#_x0000_t75" style="WIDTH: 414.75pt; HEIGHT: 312.75pt"><v:imagedata src="为Delphi控制台程序增加版本信息及图标.files/image001.png" o:title=""></v:imagedata></v:shape>

灰掉的Version information选项

<v:shape coordsize="21600,21600" id="_x0000_i1026" type="#_x0000_t75" style="WIDTH: 414.75pt; HEIGHT: 312.75pt"><v:imagedata src="为Delphi控制台程序增加版本信息及图标.files/image003.png" o:title=""></v:imagedata></v:shape>

灰掉的Icon选项

但我们如果打开subversionbin文件夹会发现,虽然这些exe也是控制台程序,但都具备版本信息和图标,也就是说,控制台程序同样可以具备这些数据。<o:p></o:p>

<v:shape coordsize="21600,21600" id="_x0000_i1027" type="#_x0000_t75" style="WIDTH: 156pt; HEIGHT: 52.5pt"><v:imagedata src="为Delphi控制台程序增加版本信息及图标.files/image005.png" cropbottom="5699f" o:title="" croptop="9973f"></v:imagedata></v:shape>

subversion的控制台程序带有图标信息

那么在Delphi需要怎么做才能加入这些信息呢?其实很简单,打开View Source(即dpr文件),在begin前面增加一句:<o:p></o:p>

{$R *.RES}<o:p></o:p>

IDE会提示xxx.res无法找到,不用管它,点确定,编译,然后再打开Project Option对话框,是不是发现上述灰掉的选项都可以用了呢?<o:p></o:p>


鲜花

握手

雷人

路过

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

请发表评论

全部评论

专题导读
上一篇:
一个最简单的Delphi2010的PNG异形窗口方法发布时间:2022-07-18
下一篇:
matlab中imread 从图形文件读取图像发布时间: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