主/详细数据集请求过多

Question

我们有一个 Delphi 应用程序，它使用 Master/Detail 关系中的 ADO 数据集。它们连接到位于另一台服务器上的 SQL Server 数据库。

由于许多详细数据集在打开时会发出大量 SQL 请求，因此应用程序在网络连接速度较慢时速度较慢。有没有办法批量发出所有详细数据集请求？

或者除了 ADO 之外有没有可以更好地处理这种情况的数据集？

Answer 1

自从我这样做以来已经有一段时间了，所以我不再能够访问我用来对其进行基准测试的数据，但是面对类似的情况，以下的速度比标准的 Master/Details 有了巨大的提升，而且非常少努力。当然可以。

在服务器上定义一个存储过程来检索所有详细数据集的所有行，就像这样

create procedure GetDetails(@MasterID int) as
begin
  select * from Details1 where MasterID = @MasterID 
  select * from Details2 where MasterID = @MasterID 
  /* etc */
end

在客户端中，设置一个数据模块，它有一个 AdoStoredProc，它调用存储的过程和与 Detail 表一样多的 AdoDatasets。

要检索详细数据集的行，请使用如下代码

var
  Rows : Integer;
[...]
spGetDetails.Parameters.ParamByName('@MasterID').Value := MasterID;
spGetDetails.Active := True;

Details1.RecordSet := spGetDetails.RecordSet;
Details1.Active ;= True;

Details2.RecordSet := spGetDetails.NextRecordSet(Rows);
Details2.Active ;= True;

Details3.RecordSet := spGetDetails.NextRecordSet(Rows);
Details3.Active ;= True;
  //  etc, you get the idea

当然，Details1..N AdoDataSets 可以连接到标准的 db-aware 编辑控件或服务器作为一组 TClientDataSets 的提供者。

顺便说一句，这在数据模块位于 3 层设置的中间层时特别有效，因为我可以将所有详细信息行打包到压缩流中，然后 dm 将其发送到客户端。

更新 以这种方式获取 Details 表的行似乎可以很好地编辑和查看它们，我无法立即明白为什么 Details 表不支持插入和删除。每个细节 ADODatasets 都需要像往常一样为 M->D 的细节端进行配置，使用 CommandText 像 'select * from Detailx where MasterID = MasterID`。