Presentación y primera consulta (DBNavigator)

[ecfisa]

Hola martinlillo y bienvenido a los foros de Club Delphi

Si no te entiendo mál, lo que buscas es que el botón siguiente quede deshabilitado al estar situado en el último registro.

Si es así, quizá te pueda servir hacer:

Código Delphi [-]
procedure TForm1.DBNavigator1BeforeAction(Sender: TObject;Button: TNavigateBtn);
begin
  with TDBNavigator(Sender).DataSource.DataSet do
    if RecNo > RecordCount-2 then
      Next;
end;

Saludos.