Скачать: CL | DM;

КАК вставить какую-нибудь программу внутрь EXE файла?   Найти похожие ветки 

← →
CrossOut   (2004-02-16 20:28) [0]

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

ARJ EXEFILE C:\UTIL\ARJ.EXE

Компилируем его в ресурс при помощи Brcc32.exe.
Получаем RES-файл. Далее в тексте нашей программы:

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? Объясните кто могите, или я что-то не понимаю...?
//-------------------------------------------------------------

---

← →
Андрей Сенченко ©   (2004-02-16 20:32) [1]

Но Ты же при этом таскаешь эту программу вместе со своим приложением. То есть цель достигнута.
А запускаться она все-равно откуда-то должна - потому и пишется сперва а диск, а потом используется.

---

← →
Андрей Сенченко ©   (2004-02-16 20:34) [2]

К тому же приведенный пример не на ВСтРАИВАЕНИЕ СВОЕЙ ПРОГРАММЫ В exe?, а наоборот - на встраивание чужого EXE в свою прогамму

---

← →
CrossOut   (2004-02-16 21:37) [3]

А как свою встроить в ЕХЕ?

---

← →
CrossOut   (2004-02-16 21:41) [4]

В самой теме двуcмысленное поставление вопроса, а я хотел бы знать см выше^

---

← →
Юрий Зотов ©   (2004-02-16 22:37) [5]

> CrossOut (16.02.04 21:37) [3]
> А как свою встроить в ЕХЕ?

А зачем?

---

← →
CrossOut   (2004-02-16 22:43) [6]

Куча аплодисментов `;[]

---

← →
Юрий Зотов ©   (2004-02-16 22:51) [7]

> CrossOut (16.02.04 22:43) [6]

Благодарю. Рад, что Вы все поняли.

---

← →
SergP ©   (2004-02-16 23:08) [8]

2 CrossOut
Решил вирь на Дельфях написать? :-)

---

← →
Marser ©   (2004-02-16 23:39) [9]

> SergP © (16.02.04 23:08) [8]
> 2 CrossOut
> Решил вирь на Дельфях написать? :-)

Какой-нибудь hddkill в 200 байт весом приаддонить к своему проекту...

---

← →
Defunct ©   (2004-02-17 00:04) [10]

> А как свою встроить в ЕХЕ?
Скомбинировать новый EXE файл из своего и другого. (продумать механизм запуска старого).

PS: Если пишется вирус, то в катлог Евгения Касперского попадет под грифом: "Студенческий вирус с кучей ошибок". Возможно дадут даже лейбу "Очень опасный, портит программы из-за ошибки".

;)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.02 c