delphi - 将记录集从 fdquery 复制到 fdquery 的简单方法

Question

使用fireDac，有没有更简单的方法将FDQuery复制到FDQuery？

当前的硬编码解决方案是将代码中的每个字段映射到代码中的每个其他字段，然后进行发布和编辑等。

var
FDQueryThis,FDQueryOther:TFDQuery;
begin
  FDQueryThis.active:=true;
  FDQueryOther.active:=true;
  FDQueryThisNamelyField.AsInteger := FDQueryThis.NamelyField.AsInteger;
// some more fields
FDQueryThis.post;
end;

是否有提供此服务的工具或功能？ 我确实看到 CopyRecord 是 TFDQuery 的成员，但是如何为 TFDQuery 创建记录？

Answer 1

我只使用 CloneCursor 方法，

FDQueryThis.CloneCursor(FDQueryOther, True, False);

Here You've got full description

但是请记住，物理数据保持不变。如果要将数据复制到其他位置，请使用 .Data 属性:

FDQueryThis.Data := FDQueryOther.Data;

致以诚挚的问候