Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.25;
Скачать: CL | DM;

Вниз

Будете смеятся: работать с архивами я теперь умею (ho-ho-ho)!   Найти похожие ветки 

 
Grouzd[E]v   (2003-09-13 09:19) [0]

Вопрос № 2:
Как эти самые архивы вшить в exe, дабы потом воспользоваться
ими (что-то вроде инсталлятора), а еще, если не лень, скажите как вообще запихивать файлы (особенно ресурсы) в исполняемый файл.


 
Anatoly Podgoretsky ©   (2003-09-13 11:11) [1]

А говоришь умеешь :-)
А в твое умение и в используемые компоненты входит понятие ресурсы и потоки, если входит, то именно потокое чтение и равпаковку надо использовать.

Запихивать чрезвычайно просто, создать .rc файл и подключить к проекту.


 
8ung ©   (2003-09-13 16:22) [2]

НАСЧЕТ "запихивать файлы ... в исполняемый файл"
var
f,f2 : TMemoryStream;
begin
f := TMemoryStream.Create;
f2 := TMemoryStream.Create;
f.LoadFromFile("c:\first.exe");
f.Position := 0;
f2.Position := 0;
f2.CopyFrom(f,f.Size);
f.LoadFromFile("c:\randomfile.exe");
f.Position := 0;
f2.CopyFrom(f,f.Size);
f2.SaveToFile("c:\dest.exe");
f.free;
f2.Free;

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


 
Grouzd[E]v   (2003-09-13 19:33) [3]

8ung! Спасибо! Пацалавал бы, да ладно!
А Podgoretsky-чу хочу сказать: корда я
писал "умею" я имел в виду ЗАПАКОВЫВАТЬ
и РАСПАКОВЫВАТЬ архивы а не соединять их
с исполняемым файлом.
However, Thanks!



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

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

Наверх




Память: 0.47 MB
Время: 0.018 c
1-82195
Verg
2003-09-12 17:06
2003.09.25
WakeMainThread


7-82515
Kviz
2003-07-13 15:19
2003.09.25
Как запустить досовское приложение в полноэкранном режиме.


1-82261
r00t
2003-09-14 21:23
2003.09.25
Как создать красивую кнопку?


3-82091
Max_
2003-09-04 17:03
2003.09.25
TSQLClientDataSet и метод Execute???


14-82481
AndreySoft
2003-08-28 12:59
2003.09.25
Как включить комп программно