|
Hola
A mí me sirvió esta solución:
procedure TForm1.DBNavigator2Click(Sender: TObject; Button: TNavigateBtn);
if button in [nbPrior] then begin.....................end;
if button in [nbNext] then begin.....................end;
if button in [nbInsert] then begin.....................end;
Saludos
|