Hola omy.
Como te comenta
AgustinOrtu, resulta mas natural usar el evento
OnBeforeDelete del
TDataSet.
Pero áun así, podes hacerlo desde el evento
BeforeAction del
TDBNavigator lanzando una excepción silenciosa, ejemplo:
Código Delphi
[-]
var
Resultado : Boolean = True;
procedure TForm1.DBNavigator1BeforeAction(Sender: TObject;
Button: TNavigateBtn);
begin
if (Button = nbDelete) and Resultado then
Abort;
...
end;
Saludos