学习使用资源文件[1] - 入门 资源文件(*
res)通过编译指令 $R 关联, 譬如工程文件 Project1 中的 {$R *
res} 就是关联 Project1
res 资源文件, 我们直接写作 {$R Project1
res} 不会有问题(但如果工程文件改名时, 你也得随着改才行)
譬如: program Project1; uses Forms, Unit1 in 'Unit1
pas' {Form1}; {$R Project1
res} begin Application
Initialize; Application
MainFormOnTaskbar := True; Application
CreateForm(TForm1, Form1); Application
Run; end
这个资源文件中至少包含着文件图标, 假如我们删除 {$R *
res} 后编译, 看前后对比图: 这时我们可以通过代码, 调用其他图标: procedure TForm1
FormCreate(Sender: TObject); begin Application
LoadFromFile('c:\temp\my
ico'); end; 这样还是不好, 如果运行程序的电脑没有这个文件呢
最好让程序携带着它, 这就要通过资源文件
让我们从头来过: 1、新建一个 VCL Forms Application; 并 Save All; 2、并通过菜单 Project → View Souse 打开工程源文件; 3、删除 {$R *
res} 4、如图新建一个 Text 文件 5、文件编辑如下: MainIcon ICON "c:\temp\my
ico" 注意: 其中的 c:\temp\my
ico 可以随便定义, 但