Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];

Вниз

КАК вставить какую-нибудь программу внутрь 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.009 c
6-94050
pavia
2003-12-24 22:09
2004.02.29
Snifer


11-93829
Кладов
2003-05-30 19:04
2004.02.29
KOL2FPC


14-94129
Домарощинер
2004-02-09 19:57
2004.02.29
Классный плагиат


14-94109
Soft
2004-02-09 18:55
2004.02.29
Типовые сценарии рекламных роликов.


3-93782
gonzales
2004-02-03 15:18
2004.02.29
Составление запроса с вычитанием одного поля из другого





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский