Funktionen von DBNavigator

[Memo]

Zitat von macht:

Super danke, das hab ich gesucht, aber was mache ich wenn ich zum Beispiel den Klick auf ein entsprechendes Feld des Navigators abfangen möchte ?

Code:

procedure TForm1.NavigatorClick(Sender: TObject; Button: TNavigateBtn);
var
  BtnName:  String;
begin
  case Button of // die wichtigsten
    nbFirst  : BtnName := 'nbFirst';
    nbPrior  : BtnName := 'nbPrior';
    nbNext   : BtnName := 'nbNext';
    nbLast   : BtnName := 'nbLast';
    nbInsert : BtnName := 'nbInsert';
    nbDelete : BtnName := 'nbDelete';
  end;
  if BtnName = 'nbInsert' then //als Bsp.
  begin
   tue was 
  end; 
end;