Самоучитель по Delphi 7 для профессионалов



              

Навигация по набору данных - часть 2


nbFirst — перемещение на первую запись набора данных; 

nbPrior — перемещение на предыдущую запись набора данных;

nbNext — перемещение на следующую запись набора данных;

nbLast — перемещение на последнюю запись набора данных; 

nblnsert — вставка новой записи в текущей позиции набора данных;

nbDelete — удаление текущей записи, курсор перемешается на следующую запись;

nbEdit — набор данных переводится в режим редактирования;

nbPost — в базу данных переносятся все изменения в текущей записи;

nbcancel — все изменения в текущей записи отменяются;

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

Самой критичной к возможной потере данных вследствие ошибки является операция удаления записи, поэтому при помощи свойства confirmDelete можно включить механизм контроля удаления. При каждом удалении записи нужно будет дать подтверждение выполняемой операции.

Нажатие любой кнопки можно эмулировать программно при помощи метода BtnClick.

В случае необходимости выполнения дополнительных действий при щелчке на любой кнопке можно воспользоваться обработчиками событий BeforeAction и Onciick, в которых параметр Button определяет нажатую кнопку. Свойства и методы компонента TDBNavigator представлены в табл. 15.6.

Таблица 15.6. Свойства и методы компонента TDBNavigator

Объявление

Тип

Описание

Свойства

property ConfirmDelete: Boolean;

Pb

Включает или отключает подтверждение удаления записи

property Hints: TStrings;

Pb

Содержит список подсказок для каждой кнопки

property Flat: Boolean;

Pb

Определяет внешний вид кнопок компонента

type TNavigateBtn = (nbFirst, nbPrior, nbNext, nbLast, nblnsert, nbDeiete, nbEdit, nbPost, nbCancel, nbRefresh);

TButtonSet = set of TNavigateBtn ;

property VisibleButtons: TButtonSet;

Pb

Список видимых кнопок

Методы

procedure BtnClick (Index:  TNavigateBtn) ;

Pu

Эмулирует щелчок на кнопке index

procedure SetBounds (ALeft,  ATop, AWidth, AHeight:  Integer) ; 

Pu

Задает положение (параметры ALeft, АТор) и размер компонента (параметры AWidth, AHeight)

Методы-обработчики событий

ENavClick = procedure (Sender: TObject; Button: TNavigateBtn) of object; Iproperty BeforeAction:  ENavClick; 

Pb

 Выполняется при щелчке на кнопке Button перед выполнением операции, связанной с кнопкой

ENavClick = procedure  (Sender: TObject; Button:  TNavigateBtn) of object; 

property OnClick:  ENavClick;

Pb

Выполняется при щелчке на кнопке Button после выполнения операции, связанной с кнопкой

 




Содержание  Назад  Вперед