delphi - 如何防止TADORecordset滚动？

Question

我想防止基于某些条件滚动ADO Recordset。
例如，这样做会很方便：

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

这该怎么做？

Answer 1

您可能会引发异常，例如：

if not (condition) then
  Abort;