64

3.24 TForm

Класс TForm является непрямым наследником TWinControl. Свойства и события класса TForm:

property BorderIcons:TBorderIcons; – указывает на кнопки, расположенные в строке заголовка;

property BorderStyle: TFormBorderStyle; – указывает на тип границы и пове-

дение формы

bsDialog – стандартное диалоговое окно, не меняющее размеры, не может иметь меню;

bsSingle – не меняющее размеры окно с тонкой границей;

bsNone – не меняющее размеры окно без границы;

bsSizeable – стандартное окно с изменяемыми размерами;

bsToolWindow – не меняющее размеры окно с маленьким заголовком;

bsSizeToolWin – меняющее размеры окно с маленьким заголовком;

property Menu: TMainMenu – указатель на меню формы;

property ModalResult: TModalResult – модальный результат, с которым было закрыто диалоговое окно;

property Visible : boolean; – видима ли форма;

property OnActivate: TNotifyEvent; – событие, возникающее когда форма по-

лучает фокус;

property OnDeactivate: TNotifyEvent; – событие, возникающее когда форма теряет фокус;

property OnClose: TCloseEvent; – событие, когда форма закрывается. Процедура обработки события имеет параметр Action, позволяющий установить режим закрытия:

caNone – ничего не происходит, отменить закрытие;

caHide – форма не будет закрыта, а просто будет невидима. Остается возможность доступа к этой форме;

caFree – действительно закрыть форму и освободить всю память;

caMinimize – вместо закрытия минимизировать форму;

property OnCloseQuery: TCloseQueryEvent; – обработка данного события поз-

воляет установить, возможно ли закрытие формы в данный момент;

property OnCreate: TNotifyEvent; – возникает после создания формы. Применяется для проведения операций выделения памяти и установки начальных значений переменных;

property OnDestroy: TNotifyEvent; – возникает перед разрушением формы и позволяет, например, освободить память;

property OnShow: TNotifyEvent; – возникает в случае, когда происходит перевод формы в видимый режим;

property OnHide: TNotifyEvent; – возникает в случае, когда происходит перевод формы в видимый режим;

65

property OnPaint: TNotifyEvent; – возникает, когда происходит перерисовка формы. Может применяться для восстановления нарисованного на “канве” изображения.

3.25TMainMenu

Класс TMainMenu является непрямым наследником TComponent и служит для создания элементов основного меню программы.

Свойства и события класса TForm:

property Images: TCustomImageList; – указывает на список изображений, при-

меняемых в меню;

property Items: TMenuItem; default; – указывает на список всех элементов ме-

ню;

3.26TMenuItem

Класс TMenuItem является наследником TComponent и служит для создания элементов основного меню программы.

Свойства и события класса TForm:

property Action: TBasicAction; – указание на действие, с которым связан элемент меню;

property Caption: string; – заголовок элемента меню;

property Checked: Boolean; – указывается, отображается ли около заголовка символ “выбрано”;

property Default: Boolean; – указывает, что двойное нажатие на элементродитель приведет к выполнению данного пункта меню;

property RadioItem: Boolean; – указывает, является ли данный элемент частью связанных пунктов меню;

property GroupIndex: Byte; – указывает, к какой группе связанных пунктов меню относится данный элемент;

property Enabled: Boolean; – указывает, доступен ли данный элемент меню;

property ImageIndex: TImageIndex; – указывает на номер рисунка, связанного

сданным элементом меню;

property Visible: Boolean; – указывает, видим ли данный элемент меню;

property OnClick: TNotifyEvent; – вызывается, если произошел выбор данного элемента меню.

3.27TStatusBar

Класс TStatusBar является наследником TWinComponent и служит для создания строки состояния программы.

Свойства и события класса TForm:

66

property Panels: TStatusPanels; – позволяет управлять панелями строки состояния;

property SimplePanel: Boolean; – скрывает все панели и выводит простую панель, занимающую всю строку состояния;

property SimpleText: string; – описывает текст, выводимый в простой панели;

3.28TStatusPanels

Класс TStatusPanels является наследником TCollection. Свойства и события класса TForm:

property Items[Index: Integer]: TStatusPanel; default; – позволяет управлять панелями строки состояния;

property Count: Integer; – описывает число панелей;

3.29TStatusPanel

Класс TStatusPanel является наследником TCollectionItem.

Свойства и события класса TForm:

property Alignment: TAlignment; – описывает правило выравнивания текста на панели;

property Bevel: TStatusPanelBevel; – описывает внешний вид панели;

property Text: string; – описывает текст, выводимый в панель;

property Width: Integer; – описывает ширину панели;

3.30TToolBar

Класс TToolBar является непрямым наследником TWinControl и служит для создания панелей управления.

Свойства класса TToolBar:

property ButtonHeight: Integer; property ButtonWidth: Integer; – описывают вы-

соту и ширину кнопок;

property Flat: Boolean; – определяет невидимость границ кнопок;

property Images: TCustomImageList; – задает стандартный набор изображений;

property DisabledImages: TCustomImageList; – задает набор изображений, ак-

тивируемый при запрете использования кнопки;

property HotImages: TCustomImageList; – задает набор изображений, активи-

руемый при помещении мыши над кнопкой;

property Buttons[Index: Integer]: TToolButton; – доступ к кнопкам;

property Indent: Integer; – определяет отступ слева первой кнопки от края панели;

property ShowCaptions: Boolean; – определяет, требуется ли показывать заголовок панели;

67

3.31 TToolButton

Класс TToolButton является наследником TGraphicControl и служит для создания кнопок на ToolBar.

Свойства класса TToolButton:

property Down: Boolean; – определяет, нажата ли кнопка;

property Grouped: Boolean; – определяет, является ли кнопка членом группы;

property Style: TToolButtonStyle; – определяет тип кнопки;

tbsButton – обычная кнопка;

tbsCheck – западающая кнопка (необходимо для группы);

tbsSeparator –кнопка-разделитель, не может быть нажата, может иметь произвольную ширину;

property ImageIndex: TImageIndex; – определяет номер изображения в списке изображений;

property Action: TBasicAction; – (наследуется из TControl) определяет, дей-

ствие, связанное с кнопкой.

Все события наследуются от TControl.

3.32 TActionList

Класс TActionList является непрямым наследником TComponent и служит для создания списка действий. Как правило, используются сами действия, поэтому свойства, методы и события данного класса не рассматриваем.

3.33 TAction

Класс TAction является непрямым наследником TComponent и служит для создания отдельного действий.

Свойства класса TAction:

property Caption: string; – определяет описание действия, например строку в меню;

property Checked: Boolean; – определяет, помечено ли данное действие, например строка в меню;

property Enabled: Boolean; – определяет, разрешено ли данное действие;

property Hint: string; – подсказка для данного действия;

property ImageIndex: TImageIndex; – номер изображения в списке изображе-

ний;

property Visible: Boolean; – определяет, отображается ли данное действие;

property OnExecute: TNotifyEvent; – возникает при выборе данного действия,

например, строки меню.

Такие же свойства есть элементов меню и кнопок. Установление их свойства Action в одно из действий автоматически меняет эти свойства. Изме-

68

нение параметров свойств у действия тут же отражается на параметрах связанных с ним элементов.