Install

[Shouldercannon]

Хочу написать программу, которая смогла бы выгрузить из себя два файла (exe и ini) по указанному адресу (адрес нужной папки будет взят из реестра). Сделать что-то на подобии инсталяционного приложения. С чего начать и как это сделать?

[_Engine_]

Скачай Inno Setup, хорошая весчь.

[AXS]

Чтоб засунуть любой файл в прогу создай текстовый файл my_res.rc в каталоге ..\delphi\bin\ , напиши в нём MYRES RCDATA "proga.exe" или MYRES RCDATA "inifile.ini". При этом MYRES это имя ресурса которое будет использоваться в проге, а proga.exe и inifile.ini это файлы которые хочеш засунуть (должны лежать рядом с my_res.rc . Сохрани, а потом перетащи my_res.rc на brcc32.exe. У тебя создастся файл my_res.res
Далее в проге, под строчкой {$R *.dfm} допиши {$R my_res.res}. Откомпилируй и файлы уже в проге.

Чтобы их вытащить на свет божий напиши в проге такой код:

var
  stream: TResourceStream;
begin
  stream := TResourceStream.Create(HInstance, 'MYRES', RT_RCDATA);
  with TFileStream.Create('proga.exe', fmCreate) do
   begin
     CopyFrom(stream, stream.Size);
     Free;
   end;
end;

[FaTaL]

А лучше поставь RXLib компоненты. После их установки, работа с ресурсами будет проще простого, не надо будет всякие rc файлы создавать и отдельно их компилировать. Если что помогу.

[Shouldercannon]

Inno Setup у меня есть, но не не сможет определить адрес к приложению через реестр. Для создания res файлов я использую Resource Builder тоже не плохая вешь. RxLib есть, но там проблема с установкой.

[Черничный]

Сообщение от AXS

Чтоб засунуть любой файл в прогу создай текстовый файл my_res.rc в каталоге ..\delphi\bin\ , напиши в нём MYRES RCDATA "proga.exe" или MYRES RCDATA "inifile.ini". При этом MYRES это имя ресурса которое будет использоваться в проге, а proga.exe и inifile.ini это файлы которые хочеш засунуть (должны лежать рядом с my_res.rc . Сохрани, а потом перетащи my_res.rc на brcc32.exe. У тебя создастся файл my_res.res
Далее в проге, под строчкой {$R *.dfm} допиши {$R my_res.res}. Откомпилируй и файлы уже в проге.

Чтобы их вытащить на свет божий напиши в проге такой код:

var
  stream: TResourceStream;
begin
  stream := TResourceStream.Create(HInstance, 'MYRES', RT_RCDATA);
  with TFileStream.Create('proga.exe', fmCreate) do
   begin
     CopyFrom(stream, stream.Size);
     Free;
   end;
end;

Самый доходчинвый и удобный вариант! FaTaL, давай свою тему выкладывай))

[_Engine_]

Сообщение от Shouldercannon

Inno Setup у меня есть, но не не сможет определить адрес к приложению через реестр.

Ошибаешься, в Inno Setup есть набор функций для работы с реестром.

[FaTaL]

Сообщение от Черничный

Самый доходчинвый и удобный вариант! FaTaL, давай свою тему выкладывай))

А что именно выложить то? Как извлечь из ресурсов?

[zetrix]

А что именно выложить то? Как извлечь из ресурсов?

что за компонент из RxLib, как исполльзовать... Я до настоящего момента тоже всё ручками делал, и через консоль res файлы собирал.

[Shouldercannon]

Сообщение от _Engine_

Ошибаешься, в Inno Setup есть набор функций для работы с реестром.

Это не сдесь? Мне надо чтобы программа установилась в папку с игрой, но для этого путь к игре надо найти в реестре.