Как объеденить два exe - файла в один, exe+exe=exe

← →
bob1906 (2002-08-13 21:53) [0]

Как объеденить два exe - файла в один, exe+exe=exe (Не для вируса)

← →
Поясни (2002-08-14 03:58) [1]

тогда. А для чего? Иначе смысл не понятен. И ответ неочевиден.

← →
ППавел (2002-08-14 04:49) [2]

Мне тоже такое надо.
Я пишу что то вроде контейнера в который мне необходимо вставить exe файлы и не только а потом их вытащить, а вот как это сделать незнаю.

← →
Андрюхин (2002-08-14 08:39) [3]

И мне тоже надо, я для организации Бэкапа в своей проге использую сторонний консольный бэкапщик. Устанавливать его отдельно не хочу, а обновление exe-шника проги на клиентах уже налажена. Вот и хочется с очередным обновлением проги установить на всех клиентах бэкапщик.

← →
zavdim (2002-08-14 09:48) [4]

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
//Записываем Exe куда надо - усе.
ExtractRes("EXEFILE", "ARJ", "ARJ.EXE");
end;

Пример не мой - но работает проверял.
Как засунуть Exe в Res - если надо спросишь.

← →
.nuke (2002-08-14 11:10) [5]

А еще можно использовать специальную программульку
Joiner-2.1 найти её можно на hack-info.ru или у меня

← →
Сергей Медяник (2002-08-14 19:16) [6]

>zavdim
Если можно, пожалуйста подскажи как именно засунуть. Мне раньше не было острой необходимости, а сейчас нужно с программой таскать несколько AVIшек для цивильного оформления - хотелось бы их упрятать в EXE.

← →
Sergant33 (2002-08-14 19:22) [7]

Поюзай мою компоненту, (грузи файл из потока)

← →
Lexa18 (2002-08-14 22:47) [8]

А что это за "наш Res-файл"?

← →
bogachev (2002-08-16 14:44) [9]

Вставить какую-нибудь программу внутрь EXE файла

1. Пишем в блокноте RC-файл, куда прописываем все нужные нам программы, например:
ARJ EXEFILE C:\UTIL\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;

Как объеденить два exe - файла в один, exe+exe=exe Найти похожие ветки