控件中的资源文件(我出100分)(100分)

  • 主题发起人 主题发起人 aizi
  • 开始时间 开始时间
A

aizi

Unregistered / Unconfirmed
GUEST, unregistred user!
请问:我想把一个文本文件(有10几K)加入到资源文件中去,然后在程序中全部读进一个字符串中,请问怎样写资源文件?(注意:是怎样"写")
急!!!!
 
windows的资源文件有*.bmp, *.cur等,它们与文本文件不相融。
既然是读*.txt文件,何不读一行转换一行呢?
 
.RC文件的内容:加入下面这行
TEXTFILE RCDATA "C:/TEMP/AA.TXT"
 
ZRY说的我以前也做过,可读出来,请问你是怎么读的,谢谢!
 
在程序中使用资源文件:

在DOS下:

copy con aa.rc <cr>
a1 string d:/aa.txt
a2 string d:/bb.txt
<F6><Cr>


这样就生成了aa.rc

C:/Program Files/Borland/Delphi4/Bin/brcc32.exe aa.rc
成生aa.res

如何在程序中调用呢?

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
Ptrtxt : PChar;
hRes : THandle;
implementation
{$R d:/aa.res}
{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
var hResInfo : THandle;
bb:string;
begin
bb:='a1';
hResInfo := FindResource(HInstance, pchar(bb), 'string');
hRes := LoadResource(HInstance, hResInfo);
if hRes > 32 then {its a good load}
begin //锁定资源
ptrtxt:=LockResource(hRes);
end;
showmessage(ptrtxt);
end;

end.



 
有谁可以贴一些C++Builder的程序呢
 
哪用这么麻烦! delphi自己有现成的函数 loadstr .
看看帮助吧!
 
cAkk说得对,loadstr很简单,我用过,程序基本上如www所写
 
有个好办法,装rxlib,在project中多一项Resources,你想怎么放资源都可以了,
很方便。load也很方便,你看看demo吧,delphi和rx的都有。
 
接受答案了.
 
后退
顶部