2.5 Компонент tLabel

TLabel служит для отображения текста на экране. (Следует обратить внимание на свойство Tlabel.Caption. Далее основные свойства и методы будут приводиться в круглых скобках). Для этого служит центральное свойство компонента - caption. С помощью свойства Font можно разнообразить вид надписи (оба эти свойства достались метке от предка TGrapnicControl и поэтому не отображаются в таблице ниже). С компонентом может быть связан оконный управляющий элемент, который выбирается при нажатии Alt+Буква, где Буква - выделенная подчеркиванием буква в тексте метки. Такие символы в терминологии Windows называются акселераторами.

2.6 Компонент tButton

TButton - кнопка с текстовой надписью (TButton.Caption).

Кнопки TButton широко используются для управления программами. Связанный с кнопкой алгоритм управления реализуется в обработчике события OnClick.

Свойства компонента:

property Cancel: Boolean; property Default: Boolean; typa TModalResult = Low (Integer) ..High (Integer); property ModalResult: TModalResult: Если имеет значение True, событие Onclict кнопки возникает при нажатии клавиши Esc. Если имеет значение True, событие Onclick кнопки возникает при нажатии клавиши Enter Определяет результат, с которым было закрыто модальное окно (см. ниже пояснение)

В терминологии Windows модальными окнами называются такие специальные окна, которые, раз появившись на экране, блокируют работу пользователя с другими окнами вплоть до своего закрытия. Обычно с их помощью реализуется диалог, требующий от пользователя принятия некоторого решения. Для этого в состав модального окна включается несколько кнопок. Если у кнопки определено свойство ModalResult, нажатие на нее приводит к закрытию модального окна и возвращает в программу значение ModalResult как результат Диалога с пользователем. В Delphi определены следующие стандартные: Значения ModalResult: mrNone Модальное окно не закрывается- mrIgnore Была нажата кнопка ignore mrOk. Была нажата кнопка ок mrYes Была нажата кнопка Yes mrCancel Была нажата кнопка cancel mrNo Была нажата кнопка No mrAbort Была нажата кнопка Abort mrAll Была нажата кнопка All mrRetry Была нажата кнопка Retry.

В отличие от большинства других видимых компонентов кнопка TButton является компонентом самой Windows и поэтому не может изменять свой цвет произвольным образом - она его меняет вместе с изменением палитры Windows.

3.Структура модуля

Модули - это программные единицы, предназначенные для размещений фрагментов программ. С помощью содержащегося в них программного кода реализуется вся поведенческая сторона программы. Любой модуль имеет следующую структуру < Более точное описание структуры модуля приводится в п. 12.1. >: заголовок секция интерфейсных объявлений секция реализации терминатор Заголовок открывается зарезервированным словом Unit за которым следует имя модуля и точка с запятой. Секция интерфейсных объявлений открывается зарезервированным словом Interface, a секция реализации - словом implementation. Терминатором модуля, как и терминатором программы, является end с точкой. Следующий фрагмент программы является синтаксически правильным вариантом модуля:

Ниже приведен текст модуля, который вы можете увидеть в окне Редактора Кода. Подробные комментарии в этом тексте поясняют, куда и что в этот код вы можете добавлять.

unit Unit1;

interface // Открытый интерфейс модуля

{Список подключаемых модулей}

uses

Windows, Messages, SysUtils, Classes, Graphics,

Controls, Forms, Dialogs, StdCtrls;

{Объявление класса формы}

type

TForm1 = class(TForm)

Label1: TLabel;

Button1: TButton;

procedure Button1Click (Sender: TObject);

private // Закрытый раздел класса

{ Private declarations }

{Сюда могут помещаться объявления переменных, функций и

процедур, включаемых в класс формы, но не доступных для

других модулей}

public // Открытый раздел класса

{ Public declarations }

{Сюда могут помещаться объявления переменных, функций и

процедур, включаемых в класс формы и доступных для

других модулей}

end;

var

Form1: TForm1;

{Сюда могут помещаться объявления типов, констант,

переменных, функций и процедур, к которым будет доступ

из других модулей, но которые не включаются в класс

формы}

implementation // Реализация модуля

{$R *.DFM}

{Сюда могут помещаться предложения uses, объявления типов,

констант, переменных, к которым не будет доступа из

других модулей. Тут же должны быть реализации всех

объявленных в разделе interface функций и процедур,

а также могут быть реализации любых дополнительных, не

объявленных ранее функций и процедур.}

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Caption := 'Это мое приложение Delphi!';

end;

end.

Модуль начинается с ключевого слова unit, после которого пишется имя модуля. Оно совпадает с именем файла, в которым вы сохранили свой модуль. По умолчанию для первого модуля имя равно Unit1, для второго Unit2 — и т.д.

Текст модуля состоит из двух основных разделов: interface — открытый интерфейс модуля, и implementation — реализация модуля. Все, что помещается непосредственно в раздел interface (типы, переменные, константы, функции, процедуры), может быть использовано другими модулями программы. Все, что помещается в раздел implementation — внутреннее дело модуля. Внешние модули не могут видеть типы, переменные, константы, функции и процедуры, размещенные в разделе реализации. В разделе interface после предложения uses, содержащего список подключаемых библиотечных модулей, вы можете видеть объявление класса вашей формы, подготовленное Delphi. Имя класса вашей формы — TForm1. В класс включены те объекты которые вы разместили на форме — метка Label1 и кнопка Button1. Кроме того в класс включено объявление того обработчика щелчка на кнопке, который вы создали — процедуры Button1Click. В классе предусмотрено также два раздела: private — закрытый раздел класса, и public — открытый раздел класса. То, что вы или Delphi объявите в разделе public, будет доступно для других классов и модулей. То, что объявлено в разделе private, доступно только в пределах данного модуля. После завершения объявления класса формы вы можете видеть строки

var

Form1: TForm1

Это объявляется переменная Form1 класса TForm1, т.е. объявляется ваша форма как объекта класса TForm1.

Затем следует раздел реализации implementation, который начинается с директивы компилятора, смысл которой, вообще говоря, знать не обязательно. Надо только следить, чтобы случайно не стереть эту директиву. Далее в разделе implementation вы можете видеть реализацию объявленной в классе процедуры Button1Click с единственным оператором, который вы ввели в программу сами. В раздел implementation вы можете сами включать помимо обработчиков событий любые объявления глобальных переменных, констант, типов, и описания функций и процедур. Если вы хотите из данного модуля получить доступ к другому разработанному вами модулю (другой форме), то в раздел implementation вам надо включить оператор uses, в котором указать файл модуля, доступ к которому вы хотите получить. Например, предложение

uses Unit2, Unit3;обеспечит вам доступ ко всем элементам, объявленным в интерфейсе модулей Unit2 и Unit3.