Создание приложения подразумевает создание форм с размещением на них необходимых компонентов, определение свойств (средств доступа к компонентам) и описание методов (функции и процедуры, выполняющие действия над компонентами).
Заставка. Заставкой называется информационное окно, выводимое на экран при запуске программы, которое затем закрывается автоматически или по команде пользователя.
Наиболее типичной является заставка, выводимая в виде окна, которое не имеет заголовка и никаких элементов управления. Это окно выводится по центру экрана и содержит рисунок и иногда несколько строк пояснительного текста с названием информационной системы,
ее назначением, названием предприятия, где она используется.
После загрузки программы заставка автоматически удаляется с экрана и из памяти.
Для того, чтобы сделать заставку, требуется, при проектировании приложения создать окно заставки (дополнить приложение еще одной формой) и вставить в него необходимый рисунок и текст. После этого следует определить некоторые свойства для данной формы.
С помощью Инспектора объектов устанавливаются такие параметры (свойства) формы:
Position := poScreenCenter;
FormStyle := fsStayOnTop;
Caption := ‘’;
BorderIcons := [];
BorderStyle := bsNone;
Создание, отображение и удаление формы-заставки осуществляется в файле проекта (по умолчанию его имя всегда project1, если вы его сами не переименуете. Обычно при сохранении проекта имя задают близкое к предметной области.
Предположим, что главная форма носит имя Form1, а форма-заставка – имя Form2.
Файл проекта имеет типовой вид. Активизируем его через команду главного меню:
program Project1;
Uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};
{$R *.RES}
Begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.Run;
End.
Экземпляр формы-заставки создается в файле проекта сразу же после инициализации приложения. После этого производится отображение заставки на экране с помощью методов Show и Update. Одного метода Show недостаточно для прорисовки формы, т.к. не запущен объект приложения и не обрабатываются сообщения операционной системы Windows. Поэтому отображение формы выполняется путем применения метода Update.
После создания главной формы заставка делается невидимой и удаляется из памяти. С этой целью в файле проекта для формы-заставки вызываются методы Hide и Free.
Необходимо сделать временную задержку для того, чтобы заставка отображалась на экране определенное время, а не исчезала сразу после создания главной формы (procedure Sleep; external kernel32 name 'Sleep' – модуля Windows библиотеки VCL, его необходимо объявить в разделе Uses).
В файл проекта добавим строки для создания заставки:
program Project1;
Uses
Forms,Windows,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};
{$R *.RES}
Begin
Application.Initialize;
// Создание и отображение заставки
Form1 := Tform1.Create(Application);
Form1.Show;
Form1.Update;
// Временная задержка заставки на экране до появления главной формы
Sleep(1500); // чем больше цифра, тем дольше на экране видна заставка
// Создание главной формы приложения
Application.CreateForm(TForm2, Form2);
// Удаление формы-заставки
Form1.Hide;
Form1.Free;
// Запуск программы на выполнение
Application.Run;
End.
Рисунок, содержащийся в заставке, рекомендуется загружать при выполнении программы. В противном случае необоснованно увеличивается размер исполняемого файла за счет того, что он включает в себя рисунок, который не потребуется в дальнейшей работе программы.
2. Диалог для ввода пароля
Реализовать в проекте ввод пароля для входа пользователя в программное приложение. Создать форму типа Password Dialog (File\New\Dialogs), создать обработчик события. Когда целесообразнее выводить форму на экран такого типа?
Задача: Для получения доступа к системе пользователь должен ввести правильный пароль – Borland, всего отводится 3 попытки для ввода пароля. Выход из цикла происходит, если пользователь введет правильный пароль или исчерпает количество попыток. В случае неверного ввода выводить сообщение «Вы ввели неправильный пароль», и приглашение для повторного ввода, в случае ввода правильного пароля – «Добро пожаловать в программу» и осуществлять переход на основную форму приложения, в случае исчерпания количества попыток –«В доступе отказано» и завершить сеанс.
3. Создание информационного окна в приложении
По выбору пункта меню «О программе» в большинстве программ существует возможность открывать специальное информационное окно программы, содержащее краткую справочную информацию о названии программного продукта, его версии, дате выпуска, авторах, фотографий авторов, контактный телефон, e-mail и другие данные.
Вызов информационного окна на экран обычно осуществляется в модальном режиме, т.е. с использованием метода ShowModal.
Наиболее типичной является заставка, выводимая в виде окна, которое не имеет заголовка и никаких элементов управления. Это окно выводится по центру экрана и содержит рисунок и иногда несколько строк пояснительного текста с названием информационной системы,
Файл проекта имеет типовой вид. Активизируем его через команду главного меню: