Вставить программу внутрь EXE файла

Delphi , Файловая система , Ресурсы

1. Пишем в блокноте RC-файл, куда прописываем все нужные нам программы, например:

ARJ EXEFILE C:\ARHIVERS\ARJ.EXE

2. Компилируем его в ресурс при помощи Brcc32.exe. Получаем RES- файл.

3. Далее в тексте нашей программы:

implementation
{$R *.DFM}
{$R test.res} //Это наш RES-файл

// Процедура для извлечения ресурса в указанный файл
procedure ExtractRes(ResType, ResName, ResNewName : String);
var
  Res : TResourceStream;
begin
  Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
  Res.SavetoFile(ResNewName);
  Res.Free;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 // Записывает в текущую папку arj.exe
 ExtractRes('EXEFILE', 'ARJ', 'ARJ.EXE');
end;

Here's the translation of the content into Russian:

Задача заключается в вставке программы в файл EXE с помощью Delphi и инструментом Resource Compiler (RC).

Вот код, который я предоставил:

implementation

{$R  *.DFM}
{$R test.res} // Это наш RES-файл

// Процедура для извлечения ресурса в указанный файл
procedure ExtractRes(ResType, ResName, ResNewName: String);
var
  Res: TResourceStream;
begin
  Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
  Res.SaveToFile(ResNewName);
  Res.Free;
end;

// Событийный обработчик для кнопки BitBtn1Click
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
   // Записывает arj.exe в текущий каталог
  ExtractRes('EXEFILE', 'ARJ', 'ARJ.EXE');
end;

Этот код определяет два процедура: 1. ExtractRes: принимает три строковых параметра (ResType, ResName и ResNewName) и извлекает ресурс из файла EXE в новый файл. 2. BitBtn1Click: является событийным обработчиком для клика кнопки, который вызывает ExtractRes с конкретными аргументами для записи arj.exe в текущий каталог.

Чтобы скомпилировать этот код в файл EXE, вам нужно выполнить следующие шаги: 1. Напишите файл RC (test.rc) с необходимыми ресурсами:

ARJ EXEFILE C:\ARHIVERS\ARJ.EXE

1. Скомпилируйте файл RC с помощью инструмента Resource Compiler (RC) (brcc32.exe):

brcc32 test.rc > test.res

1. Создайте новый проект Delphi и вставьте код в него.
2. Скомпилируйте проект Delphi, чтобы создать файл EXE.

Результатом будет файл EXE, содержащий извлеченный ресурс (arj.exe) в его разделе ресурсов.

Для вставки программы в файл EXE вам нужно модифицировать процедуру ExtractRes, чтобы записать файл executable непосредственно в раздел ресурсов файла EXE. Это требует более глубокого понимания инструмента Resource Compiler и его работы.

Альтернативное решение: Вместо записи всего файла arj.exe как ресурс, вы можете использовать built-in поддержку Delphi для вставки файлов в файл EXE. Вы можете добавить следующую строку в файл .dpr проекта:

program MyProgram;
uses ...
{$R*.DFM}
...
  ResourceIncludes := ['C:\ARHIVERS\ARJ.EXE'];

Это будет вставлять файл arj.exe в файл EXE. Обратите внимание, что это метод имеет ограничения, такие как не позволяющий изменять содержимое вставленного файла.

Если у вас есть какие-либо дополнительные вопросы или вам нужна более подробная информация по этому теме, пожалуйста, не стесняйтесь обращаться!

В статье описывается способ вставки программы внутрь EXE файла, а также пример кода на языке Pascal для извлечения ресурсов в указанный файл.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Ресурсы ::