TDBNavigator как обработать событие кнопки

← →
roman_ln © (2007-04-20 18:24) [0]

например кнопки nbNext

← →
Ega23 © (2007-04-20 18:29) [1]

очевидно, написать обработчик.

← →
roman_ln © (2007-04-20 18:36) [2]

спасибо очень помогла :)

← →
Ega23 © (2007-04-20 18:39) [3]

> roman_ln © (20.04.07 18:36) [2]
> спасибо очень помогла :)

Ты бы, чудо, сначало в мою анкету заглянуло... :)

← →
roman_ln © (2007-04-20 18:47) [4]

извени, бывает...

← →
Германн © (2007-04-21 01:33) [5]

2 Ega23 © (20.04.07 18:39) [3]

> Ты бы, чудо, сначало в мою анкету заглянуло... :)

Наверно чудо прочитало ник как ЯГА23 :-)

2 roman_ln © (20.04.07 18:24)
Кстати у TDBNavigator не предусмотрено никаких обработчиков кликов на конкретную кнопку. Все его кнопки вызывают те или иные методы DataSet"а. Посему все обработчики только у DataSet"а.

> Германн © (21.04.07 01:33) [5]
> Кстати у TDBNavigator не предусмотрено никаких обработчиков кликов на конкретную кнопку.

Предусмотрено :)

TDBNavigator.BeforeAction

Occurs when a button on the database navigator is clicked, before the action is executed.

type

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

property BeforeAction: ENavClick;

Description

Write a BeforeAction event handler to take specific action before the default response when a user clicks a button in the database navigator.

The Button parameter indicates which button was clicked.

Пример:

// При нажатии на кнопку "Go to the previous record" ничего не произойдет! procedure TForm1.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn); begin if Button = nbPrior then Abort; end;

Нафигатор был написан Борландом и встромлен в делфу по спецзаказу ЦРУ- в целях зомбирования программистов, работающих в ВПК

TDBNavigator как обработать событие кнопки Найти похожие ветки