Top.Mail.Ru
Ответы

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-шнике хранить файлы, а точнее как их туда запихать.

По дате
По рейтингу
Аватар пользователя
Новичок
13лет

Файл ресурсов *.rc нужно преобразовать в файл *.res - для этого в комплекте есть утилита windres.

Аватар пользователя
Профи
13лет

винрар, пе эксплорер, ресурсе буилдер