Компонент TDBctrlGrid
Таблица 15.5. Свойства и методы компонента TDBCtrlGrid.
| Объявление | Тип | Описание |
|---|---|---|
| Свойства | ||
| property AllowDelete: Boolean; | Pb | Разрешает или запрещает удаление текущей записи |
| property Allowlnsert: Boolean; | Pb | Разрешает или запрещает вставку новой записи |
| property Canvas: TCanvas; | Ro | Канва компонента |
| property ColCount: Integer; | Pb | Определяет число колонок с панелями |
| property EditMode: Boolean; | Pu | Разрешает или запрещает редактирование данных |
| type TDBCtrlGridOrientation = (goVertical, goHorizontal); property Orientation: TDBCtrlGridOrientation; |
Pb | Определяет порядок следования записей – по горизонтали или по вертикали |
| type TDBCtrlGridBorder = (gbNone, gbRaised); property PanelBorder: TDBCtrlGridBorder; |
Pb | Определяет способ отображения границы панели |
| property PanelCount: Integer; | Ro | Содержит число видимых одновременно панелей |
| property PanelHeight: Integer; | Pb | Определяет высоту панелей в пикселах |
| property Panellndex: Integer; | Pu | Определяет индекс панели текущей записи |
| property PanelWidth: Integer; | Pb | Определяет ширину панелей в пикселах |
| property RowCount: Integer; | Pb | Определяет число строк видимых панелей |
| property SelectedColor: TColor; | Pb | Определяет фоновый цвет панели текущей записи |
| property ShowFocus: Boolean; | Pb | Разрешает или запрещает выделение вокруг панели текущей записи |
| Методы | ||
| type TDBCtrlGridKey = (gkNull, gkEditMode, gkPriorTab, gkNextTab, gkLeft, gkRight, gkUp, gkDown, gkScrollUp, gkScrollDown, gkPageUp, gkPageDown, gkHome, gkEnd, gklnsert, gkAppend, gkDelete, gkCancel); procedure DoKey(Key: TDBCtrlGridKey); |
Выполняет операцию, заданную при помощи параметра Key. Доступны операции навигации по записям, перевода в режим редактирования, вставки, удаления записей, отмены изменений |
|
| procedure KeyDown (var Key: Word; SHIFT: TSHIFTState); override; | Используется при нажатии клавиши для трансляции кодов клавиш | |
| Методы-обработчики событий | ||
| type TPaintPanelEvent = procedure (DBCtrlGrid: TDBCtrlGrid; Index: Integer) of object; property OnPaintPanel: TPaintPanelEvent; |
Вызывается при перерисовке панели. Параметр Index соответствует индексу панели | |