在Delphi中如何使用RC文件中的字符串表

原创 2002年05月24日 12:31:00
Delphi中如何使用RC文件中的字符串表 

原作作者:wangzhidong(Steven Bob)

时间:2002325日星期一 <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

首先用NotepadResource workshop 4.5建立RC文件。

结构如下 

/****************************************************************************

rcdemo.rc

produced by Borland Resource Workshop

*****************************************************************************/

#include "urcdemo.pas"

STRINGTABLE

{

 IDS_HELLO, "I am glad to see you."

 IDS_RC, "This programming is created by %s."

}

然后用BRCC.EXE BRCC32.exercdemo.rc编译成rcdemo.res文件,接着把rcdemo.res改名

rcdemo.rc文件。 如用Resource workshop 4.5会产生一个PAS单元文件,本例为urcdemo.pas

内容如下:

(****************************************************************************

urcdemo.pas

produced by Borland Resource Workshop

*****************************************************************************)

unit urcdemo;

interface

const

       IDS_HELLO   =     2;

       IDS_RC  =     1;

implementation

end.

利用此项技术可实现错误处理中字符串问题存储问题和程序的本地化问题。

范例:

unit ufmRCDemo;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls;

type

  TForm1 = class(TForm)

    GroupBox1: TGroupBox;

    Button1: TButton;

    Button2: TButton;

    GroupBox2: TGroupBox;

    Button3: TButton;

    Button4: TButton;

    procedure Button1Click(Sender: TObject);

    procedure Button2Click(Sender: TObject);

    procedure Button3Click(Sender: TObject);

    procedure Button4Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

implementation

uses urcdemo;

{$R rcdemo.rc}

{$R *.dfm}

{利用windows API}

procedure TForm1.Button1Click(Sender: TObject);

var

  arystr: array [0..255] of char;

begin

  windows.LoadString(hInstance, IDS_RC, arystr, sizeof(arystr));

  ShowMessage(arystr);

end;

procedure TForm1.Button2Click(Sender: TObject);

var

  arystr: array [0..255] of char;

begin

  windows.LoadString(hInstance, IDS_Hello, arystr, sizeof(arystr));

  ShowMessage(arystr);

end;

{利用Delphi原生函数}

procedure TForm1.Button3Click(Sender: TObject);

begin

  ShowMessage(LoadStr(IDS_Hello));

end;

procedure TForm1.Button4Click(Sender: TObject);

begin

  ShowMessage(LoadStr(IDS_RC));

end;

end.

注意:16位格式于32位格式的差异。

实例下载:http://www.megspace.com/computers/coreware/

delphi读写程序资源文件

在写程序的时候有些功能需要资源文件因此改写MSDN的例子function  readSource(loadFile:PChar;var str:string):Boolean;var  hres:TH...
  • yczz
  • yczz
  • 2007-12-18 20:41:00
  • 1053

delphi资源文件制作及使用详解

一、引子: 现在的Windows应用程序几乎都使用图标、图片、光标、声音等,我们称它们为资源(Resource)。最简单的使用资源的办法是把这些资源的源文件打入软件包,以方便程序需要的时候调用。资源...
  • zang141588761
  • zang141588761
  • 2016-08-30 10:46:19
  • 1218

各种资源的利用(如何使用RC文件)

----在编写程序的过程中,经常要用到各种资源。比如说,想给自己的程序换个自己的图标,使用一些活泼的光标来增加趣味性,播放一些声音和动画文件,或者使用别人写好的程序来实现某个功能。我们往往希望将这些资...
  • nodeman
  • nodeman
  • 2015-01-27 15:52:48
  • 388

Delphi 7资源文件的使用

在Delphi 7下没有VC下方便的RES资源编辑器,有一个Image Editor,但是功能有限,且支持的格式少。除了可以借用VC的资源编辑器和其他工具,我们还可以手动制作资源文件。...
  • akof1314
  • akof1314
  • 2011-05-18 17:30:00
  • 6286

远程调用接口<em>RC</em>_4.0.0.0

nse 类主要负责对端指定 Function 请求的执行处理, 如参数<em>读取</em>、返回 值编辑及...<em>RC</em> 4.0\\_exports\\<em>Delphi</em>\\RC4TCP.pas \\<em>RC</em> 4.0\\_exports\\<em>Delphi</em>\\<em>RC</em>Kernel.pas ...
  • 2018年04月01日 00:00

rc级别 避免脏读的实现(LBCC & MVCC)

两种方式:LBCC和MVCC先看LBCC:从此隔离级别效果入手:事务只能读其他事务已提交的的记录。数据库事务隔离级别的实现,InnoDB 支持行级锁,写时加的是行级排他锁(X lock),那么当其他事...
  • silyvin
  • silyvin
  • 2018-02-13 11:12:39
  • 67

给Delphi程序添加版本信息

我们在用Delphi编译完程序,准备发布产品时,总希望随产品发布个性信息以标示产品的来源以及开发者等信息,就像windows的程序一样,使我们一看属性就知道他是微软的产品,这些在Delphi中是如何实...
  • linzhisong
  • linzhisong
  • 2006-08-24 08:52:00
  • 3517

修改vc程序的.rc资源文件中的版本信息等

1、第一次创建rc资源文件可以通过在vc中添加脚本并插入版本信息。 2、第二次修改rc资源可以用文本文件直接打开这个rc资源。...
  • lz465350
  • lz465350
  • 2014-12-02 20:53:11
  • 1466

Delphi资源文件的应用

(一)初级应用篇: 资源文件一般为扩展名为res的文件.在VC中资源文件用得非常普遍,但Delphi在其联机帮助中对资源文件没作什么介绍,其实利用其自带的资源编译工具BRCC32.EXE(一般位于\D...
  • lailai186
  • lailai186
  • 2013-08-31 13:00:57
  • 3435

射频卡 s50 <em>Delphi</em>7.0读写程序

射频卡 s50 <em>Delphi</em>7.0读写程序 加上数据库即可实现发卡管理 综合评分:4(20位...mf<em>rc</em>531射频卡读写芯片中文资料 立即下载 上传者: sunqishuai1 时间: 2009-...
  • 2018年03月28日 00:00
收藏助手
不良信息举报
您举报文章:在Delphi中如何使用RC文件中的字符串表
举报原因:
原因补充:

(最多只允许输入30个字)