Вверх ↑
Ответов: 1309
Рейтинг: 49
#1: 2008-12-20 14:04:37 ЛС | профиль | цитата
Мне понравился следующий вариант: главное приложение само выполняет функции инсталлятора. Первоначально файл называется Setup.exe. При запуске под этим именем приложение устанавливает себя, после установки программа переименовывает себя и перестает быть инсталлятором.


Application.Initialize;
if UpperCase(ExtractFileName(Application.ExeName))='SETUP.EXE' then
// форма инсталлятора
Application.CreateForm(TSetupForm, SetupForm)
else
// форма основной программы
Application.CreateForm(TMainForm, MainForm);
Application.Run;


Вполне очевидно, что вместо переименования можно запускать программу с различными ключами, например /INSTALL и /UNINSTALL. Я очень часто пользуюсь таким приемом, особенно в тех случаях, когда проект состоит из одного файла


Взято отсюда:
http://www.delphisources.ru/pages/faq/base/small_installer.html
Надо только немного изменить код под Хиасм...
карма: 3
Hiasm + Flowstone + CopperCube + GoDot + JS
0