Справочник по компонентам Delphi. Часть 2 - Компонент TPanel

Written on . Posted in Delphi

ОГЛАВЛЕНИЕ

Страница 35 из 61

Компонент TPanel

TObject -> TPersistent -> TComponent -> TControl -> TWinControl ->  -> TCustomControl -> TCustomPanel -> TPanel

Модуль EXTCTRLS

Страница Палитры компонентов Standard

Этот компонент — панель — является несущей конструкцией для размещения других элементов управления. В отличие от простой рамки (TBevel) панель сама является оконным элементом управления и родителем для всех разме­щенных на ней компонентов. Часто ее используют для создания панелей инстру­ментов, строк состояния и т. п.

За внешнее оформление панели отвечают свойства:

(Pb) property Bevel Inner: TPanelBevel;
(Рb) property BevelOuter: TPanelBevel;
TPanelBevel = (bvNone, bvLowered, bvRaised);
(Pb) property BevelWidth: TBevelWidth;
TBevelWidth = 1..Maxint;
(Pb) property BorderWidth: TBorderWidth;
TBorderWidth = 0..Maxint ;

На границах панели размещаются две специальные окаймляющие рамки (bevels): Bevellnner и BevelOuter. При помощи комбинации белого и серого цветов они имитируют трехмерность — приподнятость (bvRaised) или утоп-ленность (bvLowered). Обе рамки имеют ширину BevelWidth. Наружная — BevelOuter — расположена прямо по периметру панели, вторая — Bevellnner — внутри на расстоянии BorderWidth от нее. Обе могут быть невидимыми (bvNone), приподнятыми или утопленными.

Комбинируя сочетания bvLowered/bvRaised, можно создать вокруг панели "ров" или "вал".

Иллюзию трехмерности может подчеркнуть также стиль обрамления компо­нента:

(Pb) property BorderStyle: TBorderStyle;
TBorderStyle = bsNone .. bsSingle;

Значение bsSingle означает, что панель будет окаймлена черной линией единичной толщины (по периметру, снаружи от обеих рамок).

Выравнивание текста заголовка панели определяется при помощи свойства:

(Pb) property Alignment: TAlignment;

Свойство(Pb) 

property Locked: boolean;

предназначено для определения способа взаимодействия панели     с размещен­ными на ней объектами OLE. Если оно равно True, последние при      активизации сервера OLE "по месту'" не могут заместить панель. В обработчике события: 

(Pb) property OnResize: TNotifyEvent;

может быть предусмотрена реакция пользователя на изменение размеров панели.

форум delphi