Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
delph_t.doc
Скачиваний:
92
Добавлен:
12.04.2015
Размер:
2.26 Mб
Скачать

TSplitter- компонент для изменения размеров

property Beveled: Boolean;

Управляет трехмерным изображением компонента. Если False, компонент виден как узкая полоска фона между разделяемыми им компонентами.

NaturalNumber = 1..High(Integer) ; property MinSize: Natural-Number;

Содержит минимальный размер любого из компонентов, которых разделяет TSplitter. Если выравнивание alLeft или alRight - минимальная ширина компонента слева и справа от TSplitter, если alTop или alBottom - минимальная высота компонента выше или ниже от него.

TControIBar- инструментальная панель Свойства компонента:

property AutoDrag; Boolean;

Разрешает/запрещает компонентам ToolBar покидать границы ControlBar.

property Picture: TPicture;

Содержит изображение, которое, периодически повторяясь, создает фон компонента.

property RowSize: TRowSize;

Задает высоту одного ряда инструментальных панелей. Умалчиваемое значение 25 в точности соответствует высоте одной панели, и в этом случае между рядами нет зазора.

property RowSnap: Boolean;

Если содержит True, «причаливаемая» панель будет выравниваться по высоте ряда.

События компонента:

TBandInfoEvent = procedure(Sender: TObject; Control: TControl; var Insets: TRect; var PreferredSize, RowCount: Integer) of object; property OnBandInfo: TBandInfoEvent;

Возникает при перемещении панели внутри компонента: Sender - компонент; Control -панель; Insets - зазор между сторонами компонента и панели; PreferredSize - предпочтительная ширина панели; RowCount -количество рядов панелей.

TBandMoveEvent = procedure (Sender: TObject; Control: TControl; ARect: TRect) of object-property OnBandMove:TBandMoveEvent ;

Возникает при перемещении панели внутри компонента: Sender - компонент; Control -панель; ARect - прямоугольник для размещения панели.

TBandPaintEvent = procedure (Sender: TObject; Control: TControl; Canvas: TCanvas; var ARect: TRect; var Options: TBandPaintOptions) of object/

Возникает при необходимости прорисовки панели: Sender- компонент; Control-панель; Canvas - канва для прорисовки; ARect -прямоугольник прорисовки; Options -определяет, какая часть панели нуждается в прорисовке.

property OnPaint: TNotifyEvent;

Возникает при необходимости прорисовки компонента.

TApplicationEvents - обработчик сообщений Windows Методы компонента:

procedure Activate;

Делает компонент первым получателем сообщений.

procedureCancelDispatch;

Запрещает получение текущего сообщения остальным компонентам.

События:

type TActionEvent = procedure(Action: TBasicAction; var Handled: Boolean) of object; property OnActionExecute: TActionEvent;

Это сообщение возникает тогда, когда пользователь активизирует управляющий элемент, приписанный определенному действию, в котором не определен обработчик OnExecute.

type TActionEvent = procedure(Action: TBasicAction; var Handled: Boolean) of object/property OnActionUpdate:TActionEvent;

Это сообщение возникает тогда, когда пользователь активизирует управляющий элемент, приписанный определенному действию, в котором не определен обработчик OnUpdate.

property OnActivate: TNoti-fyEvent;

Возникает при активизации приложения.

property OnDeactivate: TNotifyEvent;

Возникает при деактивизации приложения.

type TExceptionEvent = procedure (Sender: TObject; E: Exception) of object/property OnException: TExceptionEvent;

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

type THelpEvent = function (Command: Word; Data: Longint;of object; property OnHelp: THelpEvent;

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

property OnHint; TNotifyEvent;

Возникает перед выдачей оперативной справки для компонента, свойство Hint которого не пустая строка.

type TIdleEvent = procedure (Sender: TObject; var Done: Boolean) of object-property Onldle: TIdleEvent;

Возникает, когда программа переходит в состояние ожидания. Если в Done установлено значение False, после выполнения других работ Windows вновь вызывает приостановленную программу, в противном случае вызов программы происходит только при поступлении в ее адрес очередного сообщения.

type TMessageEvent == procedure (var Msg: TMsg; var Handled: Boolean) of object; property OnMessage: TMessageEvent;

Возникает при поступлении любого сообщения от Windows. Msg - сообщение (его тип описан в п. 16.6.3), Handled==True, если обработчик завершил обработку сообщения.

property OnMinimize: TNotifyEvent;

Возникает при минимизации главного окна программы.

property OnRestore: TNotifyEvent;

Возникает при восстановлении размеров главного окна программы.

ShortCutEvent = procedure (var Msg: TWMKey; var Handled: Boolean) of object-property OnShortCut: TShortCutEvent;

Возникает, когда пользователь нажал клавишу на клавиатуре (перед событиями OnKeyDown или OnKeyPress). Позволяет программе распознать и интерпретировать нажатие клавиш-акселераторов.

type TShowHintEvent = procedure (var HintStr: String; var Can-Show: Boolean; var. Hintlnfo: THintInfo) of object-property OnShowHint: TShowHintEvent;

Возникает перед появлением оперативной справки Hint. HintStr - строка для справки; Hintlnfo - информация об окне справки. Установите в CanShow значение True, если нужно отобразить справку (остальные параметры к этому времени могут быть изменены).

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]