使用字符串资源的技巧

----不同于其它资源,字符串资源不能直接编辑,需要先按格式编
制一个文本文件,再用程序将其编译成资源文件。下面用一个简单
的例子来说明。首先用文本编辑器编一个文件lb.rc,其内容如下:

STRINGTABLE
BEGIN
1,"开始"
2,"退出"
END

----然后,找到Delphi的Bin子目录下的BRCC32.EXE文件进行编
译,命令格式为:BRCC32LB.RC,编译结束后即生成一个资源文件
lb.res。要使用该资源文件,需要在单元文件 implementation部分
的开始处包括资源文件: {$RLB.RES}。在本例中,上面的字符串
用于给一个命令按钮更换Caption设置,使用的函数是WindowsAPI
函数LoadString,以下是使用实例:

//在FormCreat过程中:
var
txtCaption: array[0..255]ofchar;
begin
//
ifLoadString(HInstance,1,txtCaption,SizeOf
(txtCaption))〉0then
btnStart.Caption:=StrPas(txtCaption);
end;
//在btnStartClick过程中:
var
txtCaption: array[0..255]ofchar;
begin
ifLoadString(HInstance,2,txtCaption,
SizeOf(txtCaption))〉0then
btnStart.Caption:=StrPas(txtCaption);
end;


----这样就可以在程序运行时改变各种属性,而不需要在程序中出
现字符串。如果使用另一个Delphi函数LoadStr,会显得更加简单:

var
txtCaption: String;
begin
txtCaption:=LoadStr(2);
iftxtCaption〈〉′′ then
btnStart.Caption:=txtCaption;
end;

----或许大家可以从以上的过程中看出,使用123来标识一个字符
串有些简陋,也很容易出错,那么怎么办呢?我们可以采取像C++
中使用字符串的方法,为每个字符串预定义一个ID,如:

const
IDC-START=1;
IDC-EXIT=2;

----当然要把它放在一个 unit里(类似于C++的.h文件),在使
用的单元里再 uses一下就可以了,这样应用感觉是不是很爽呢?

txtCaption:=LoadStr(IDC-EXIT);

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值