Lazarus файл ресурсов
Мне необходимо извлечь из exe-шника файл
прописал в проекте:
{$R mydata.rc}
содержание файла mydata.rc:
name RCDATA "name.exe"
Процедура:
procedure TForm1.Button2Click(Sender: TObject);
var
S: TResourceStream;
F: TFileStream;
begin
// create a resource stream which points to our resource
S := TResourceStream.Create(HInstance, 'name', RCDATA);
try
// create a file mydata.dat in the application directory
F := TFileStream.Create(ExtractFilePath(ParamStr(0)) + 'name.exe', fmCreate);
try
F.CopyFrom(S, S.Size); // copy data from the resource stream to file stream
finally
F.Free; // destroy the file stream
end;
finally
S.Free; // destroy the resource stream
end;
end;
Выдает ошибку: Error: Identifier not found "RT_RCDATA"
Заменяю RT_RCDATA на 'RT_RCDATA'
компелируется,но толку мало, при запуске процедуры вадает исключение.
Как быть и что делать?
Если можно дайте описание, как в exe-шнике хранить файлы, а точнее как их туда запихать.
Файл ресурсов *.rc нужно преобразовать в файл *.res - для этого в комплекте есть утилита windres.
винрар, пе эксплорер, ресурсе буилдер