[roman]

Prueba con el evento BeforeScroll del DataSet.

Agrego:

Es decir:

Código Delphi [-]
procedure TForm1.Table1BeforeScroll(DataSet: TDataSet);
begin
  if LaCondicionSeCumple then
    abort;
end;

// Saludos