ПредишенСледващото

Строго погледнато, TDBNavigator компонент (DB навигатор) не е предназначена за данните на дисплея. Неговата цел - да даде на програмата на потребителя удобен начин за преместване чрез записите на НД и улеснява действията си, като поставите нов рекорд, както и редактирате и изтривате съществуващите записи. Въпреки това, DB Navigator се използва само в съчетание с елементи на изображения, така че ми се струва уместно да се разгледат неговите характеристики в този урок.

Фиг. 6.11 показва бутоните за навигация.

компонент tdbnavigator

Фиг. 6.11. бутон DB Navigator

За първо място - премества курсора на първия запис;

За Предварително - поставя курсора към предишния запис;

За Next - премества курсора на следващия запис;

За последно - премества курсора последното вписване;

На Добавяне - ND се превръща в режима на вмъкване нов рекорд;

За Delete - изтрива текущия запис;

За Edit - ND се превръща в режим на редактиране;

На пост - съхранява промените, направени в текущия запис;

За Cancel - отменя промените, направени в текущия запис;

За Refresh - актуализира LP (за TQuery - само ако заявката се актуализира).

Използването компонент DataSource се свързва с правилните данни източник TDataSourse - е всичко, което е необходимо за правилното функциониране. Изпратен следния имот контролира дисплея на диалогов прозорец с молба да потвърдите изтриването на запис (True стойност на това имущество показва на екрана):

имот ConfirmDelete: Булева;

Ако след Имотът е разположен до Вярно е, бутоните са плоски, в противен случай - Surround:

имот Flat: Булева;

С други свойства, можете да покажете само бутоните за навигация, които са необходими:

Типове TNavigateBtn = (nbFirst, nbPrior, nbNext, NBLAST,

nblnsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh);

Типове TButtonSet = набор от TNavigateBtn;

VisibleButtons за недвижими имоти: TButtonSet;

Например, ако ND е резултат от навигатор невъзобновяеми заявка, че има смисъл да се запази само за първите 4 бутони.

С помощта на следния метод, можете да се симулира с едно щракване с десния бутон на навигация:

процедура BtnClick (Индекс: TNavigateBtn); две конкретни събития са определени по отношение на компонента:

тип = процедура ENavClick (Sender: TObject;

Button: TNavigateBtn) на обект; имот BeforeAction: ENavClick; имот OnClick: ENavClick;

първо събитието манипулатор получава контрол, преди да изпълни действията, свързани с кликване върху бутона бутон, докато OnClick манипулатор - след действието.

Свързани статии

Подкрепете проекта - споделете линка, благодаря!