![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
EXE файл
Neosted © (2005-11-27 20:39:00)Как в свою программу поместить другой exe, т.е. когда программа выполняется при нажатии на кнопку она распаковывает встроенный в неё Exeшник и запускае его?
Заранее спасибо.
аматор (2005-11-28 00:41:00) [1]Привет...
http://delphiworld.narod.ru- залезайте туда, скачайте справочник (там такая ситуация есть и ещё маленький чумадан)
Eksell (2005-11-28 00:34:00) [2]Значит так :
1. Пишем в блокноте RC-файл, куда прописываем все нужные нам программы, например:
MyFile EXEFILE C:\MyFile.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
// Для того чтоб выдернуть наш ресурс пишем :
ExtractRes('EXEFILE', 'MyFile', 'MyFile.EXE');
end;
Вот и все...
Zeqfreed (2005-11-27 23:56:00) [3]Neosted (27.11.05 23:03) [2]
См. Fay © (27.11.05 20:44) [1]
>P.S.
> ... перед этим можно поискать на сайте по словам
> "ресурс" и "CreateProcess".
Neosted (2005-11-27 23:03:00) [4]А более подробно можно?
Fay (2005-11-27 20:44:00) [5]Запихай в ресурс.
P.S.
... перед этим можно поискать на сайте по словам "ресурс" и "CreateProcess".