После завершения разработки прикладного программного обеспечения вам также необходимо создать стандартизированную программу установки программного обеспечения. Это последний шаг в разработке программы, а также очень важный шаг, поскольку запуск программы установки часто является первым. вещь, которую делают пользователи.
Во многих газетах и периодических статьях описано множество методов использования installshield и другого программного обеспечения для создания программ установки. Этот метод позволяет быстро установить более распространенный режим установки, но у этого метода есть некоторые недостатки. Например, программа установки. как правило, относительно небольшой, единый стиль; невозможно гибко управлять методами запуска и ярлыками. Фактически, несколько шагов программы установки относительно фиксированы, и мы можем написать программу установки самостоятельно. Ниже приводится подробное введение в использование DELPHI для написания программы установки со своими собственными характеристиками программного обеспечения.
Некоторые принципы, которым должна соответствовать программа установки, такие как однократная настройка и т. д., были представлены во многих статьях в соответствующих журналах, поэтому я не буду повторять их здесь. Здесь мы в основном представляем несколько основных процессов при написании программы установки:
1. Сделайте программы, которые необходимо установить, в файлы ресурсов.
Шаг 1. Напишите файл сценария ресурсов myres.rc, который можно написать в Блокноте.
MYDBSRC mydbsrcfile c:esdemomynbdb.mdb
MYDBJET mydbjetfile c:esdemomdac_typ.exe
MYDBAPP mydbappfile c:esdemoTnbdemo.exe
7001 Значок c: esdemosetup.ico
Шаг 2. Используйте BRCC32 для компиляции и создания файла ресурсов myres.res.
brcc32.exe myres.rc
2. Напишите код программы установки
Шаг 1. Добавьте оператор {$R mymyres.RES} в файл setup.dPR, чтобы файл ресурсов включался при компиляции файла.
Шаг 2. Напишите фоновый интерфейс программы установки.
//Эффект цветового градиента интерфейса достигается путем закрашивания соседних прямоугольных блоков градиентной кистью.
//Также возможно реализовать другие интерфейсы установки со спецэффектами.
вар я, j: целое число;
Дкт:ТРект;
начинать
form1.WindowState:=wsMaximized;
j:=form1.width;
//Получаем высоту формы
для i:= от 0 до 255 сделать
//Установим здесь значение цвета в RGB()
начинать
Canvas.Brush.Color:=RGB(0,0,255-i);
//Цвет кисти для каждого нарисованного прямоугольника (слева, сверху, справа, снизу)
//Dct:=Rect(i*2,0,(i+1)*2,j);
Dct:=Rect(0,i*2,j,(i+1)*3);
//Прямоугольная область, окрашиваемая каждый раз
Холст.FillRect(Dct);
Form1.Canvas.TextRect(Dct,30,40,'Система управления курсами университета Нинбо v1.0');
//цвет заливки
конец;
конец;
Шаг 3. Создайте основной рабочий каталог программы.
//Установка среды каталога и файлов конфигурации
если не DirectoryExists(EdtDir.Text), то
// if MessageBox(getfocus,'Этот каталог не существует, вы хотите его создать?','Ask',1) = idOK then
пытаться
ForceDirectories(EdtDir.Text);