Привет, Гость! Регистрация RSS
Среда, 15.05.2024
Главная » Статьи » Основные статьи сайта

Создание и использование заставки в приложении

Создание приложения подразумевает создание форм с размещением на них необходимых компонентов, определение свойств (средств доступа к компонентам) и описание методов (функции и процедуры, выполняющие действия над компонентами).

Заставка.  Заставкой называется информационное окно, выводимое на экран при запуске программы, которое затем закрывается автоматически или по команде пользователя. Посмотреть пример с заставкой »

Наиболее типичной является  заставка, выводимая в виде окна, которое не имеет заголовка и никаких элементов управления. Это окно выводится по центру экрана и содержит рисунок и иногда несколько строк пояснительного текста с названием информационной системы, ее назначением, названием предприятия, где она используется.

После загрузки программы заставка автоматически удаляется с экрана и из памяти.

 Для того, чтобы сделать заставку, требуется, при проектировании приложения создать окно заставки (дополнить приложение еще одной формой) и вставить в него необходимый рисунок и текст. 

После этого следует определить некоторые свойства для данной формы.

С помощью Инспектора объектов устанавливаются  такие параметры (свойства)  формы:

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;

// Создание и отображение заставки

   Form2 := Tform2.Create(Application);

   Form2.Show;

   Form2.Update;

// Временная задержка заставки на экране до появления главной формы

   Sleep(1500);  // чем больше цифра, тем дольше на экране видна заставка

 

// Создание главной формы приложения

  Application.CreateForm(TForm1, Form1);

// Удаление формы-заставки

Form2.Hide;

Form2.Free;

 

// Запуск программы на выполнение

  Application.Run;

end.

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

Посмотреть пример с заставкой »

Нравится
Категория: Основные статьи сайта | Добавил: Dark_Green (22.10.2012)
Просмотров: 7220 | Теги: приложение, форма-заставка, заставка delphi, создание заставки, заставка, Создание и использование заставки | Рейтинг: 0.0/0

Другие статьи
»
Работа с компонентом TMemo и диалогами открытия (TOpenDialog) и сохранения файлов (TSaveDialog) (0)
»
Процедуры и функции в Delphi (0)
»
Использование приложений MDI и SDI (0)
»
Формы со вкладками. Оформление приложений с помощью многостраничных панелей. (0)
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]