1

我已经制作了资源文件,并已将其编译并与我的 delphi 单元链接。但是从该资源文件中读取时我遇到了问题。

implementation

{$R *.dfm}
{$R 'stuff.res' 'stuff.rc'}

procedure TForm1.FormCreate(Sender: TObject);
  var vExeFile: string;
  RS: TResourceStream;
begin
  RS := TResourceStream.Create(HInstance, 'ExeTest', RT_RCDATA);
  try
    vExeFile := ExtractFilePath(ParamStr(0)) + 'tmp.exe';
    RS.SaveToFile(vExeFile);
  finally
    RS.Free;
 end;
end;

我已经尝试了上面的代码,但它显示Resource ExeTest not found

4

1 回答 1

0

如果您想导出 RCDATA,您的 rc 文件必须如下所示:

ExeTest RCDATA YourDataFileName
于 2013-04-06T18:24:38.030 回答