Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.29;
Скачать: 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 вся ветка

Текущий архив: 2004.02.29;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.028 c
1-94002
ANS
2004-02-16 21:50
2004.02.29
Обработка тестовых файлов в UTF-8


14-94101
ИМХО
2004-02-10 03:02
2004.02.29
Фотографу


3-93769
GIL
2004-02-04 12:23
2004.02.29
IBSQL не работает


1-94006
Павел
2004-02-18 16:58
2004.02.29
Создание собчсьвенного инсталяторя


1-93889
YurikGl
2004-02-14 14:48
2004.02.29
Границы таблицы в Rave