德尔福ADO查询

Question

有没有比遍历 ADO 数据集更快的方法

while (not ADOQuery1.Eof) do
    begin
      /* Do something */
      ADOQuery1.Next;
    end;

我需要扫描大约 9000 个项目的数据集，并且仅提取与一组预定义的分支编号匹配的记录。

Answer 1

如果不需要花时间更新数据集中关联的可见控件，请确保使用禁用控件/启用控件。

try
  ADOQuery1.DisableControls;
  while (not ADOQuery1.Eof) do
    begin
      /* Do something */
      ADOQuery1.Next;
    end;
finally
  ADOQuery1.EnableControls;
end;

问候。