如何防止 TADORecordset 滚动？答案

【问题标题】：How to prevent TADORecordset from scrolling?如何防止 TADORecordset 滚动？
【发布时间】：2010-02-18 11:16:42
【问题描述】：

我想根据某些条件阻止 ADORecordset 的滚动。

例如，这样做会很方便：

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

如何做到这一点？

【问题讨论】：

您为什么要这样做？您是否试图阻止用户滚动？
我有主从关系，但详细记录集处于 ltBatchOptimistic 模式。如果主记录集将更改其位置，则详细记录集更改可能会丢失。如果想在滚动主记录集之前显示一个确认窗口。
您或许可以使用内存中的表作为主表和详细表，然后您可以更好地控制何时应用（或放弃）任何修改
是的，但是将数据发回数据库会怎样呢？我将不得不使用另一个组件来进行插入。

【解决方案1】：

您可以引发异常，例如：

if not (condition) then
  Abort;

【讨论】：