How to prevent TADORecordset from scrolling?

Question

I would like to prevent scrolling of ADORecordset basing on some condition.

For example it would be convenient to do something like that:

procedure TfrmMain.qryCenyBeforeScroll(DataSet: TDataSet);
begin
  if not (condition) then
    qryCeny.DoNotScroll;  //Just the idea
end;

How to do this?

Answer 1

You could raise an exception, for example:

if not (condition) then
  Abort;