books , soft , mp3 and others

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.


Вы здесь » books , soft , mp3 and others » Программирование в среде Delphi 7 » Статья : Написать очень маленький инсталлятор


Статья : Написать очень маленький инсталлятор

Сообщений 1 страница 2 из 2

1

Статья : Написать очень маленький инсталлятор 

Главное приложение само выполняет функции инсталлятора. Первоначально файл называется 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

0

2

:cool:

0


Вы здесь » books , soft , mp3 and others » Программирование в среде Delphi 7 » Статья : Написать очень маленький инсталлятор