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;