sql - ClientDataset.RefreshRecord 在 Delphi XE 中不再适用于连接表 - 有解决方法吗？

Question

当尝试刷新通过 SQL 语句中的联接表连接到数据集的 ClientDataset 上的记录时，TClientDataset.RefreshRecord 不再生成 SQL 的表联接部分。

因此，调用此方法会导致每个不在主表中的字段出现 SQL 错误“无效列名”。

这在 Delphi 2010 及更早版本中不是问题。

连接到 TClientDataset 的 DBX4 或 BDE 组件都会发生该错误，因此问题很可能是 TClientDataset 代码更改导致的问题。

要重现此问题:

在 Delphi XE 中创建一个只有一个表单的新应用程序，并将所需的数据库组件(TSQLMonitor、TSQLConnection、TSQLQuery、TDatasetProvider、TClientDataset、TDatasource 和 TDBGrid)拖放到其上，并将它们相互绑定(bind)。

创建了一个带有表连接的简单 SQL 语句，并将其放置在 TSQLDataset.SQL 属性中。

SQL 语句仅包含两个字段 - 主表的关键字段和连接表中的字段 - 例如伪代码:

Select 
  MainTable.IntegerKeyField
  , JoinedTable.JoinField
FROM MainTable
LEFT OUTER JOIN JoinedTable ON MainTable.LookupFieldID = JoinedTable.JoinKeyField

将这两个字段添加为 TSQLQuery 和 TClientDataset 中的持久字段，并为关键字段(包括 pfInKey)提供提供者标志(如果 RefreshRecord 不知道哪个字段是关键，则 RefreshRecord 将无法工作，因此必须使用持久字段)。

在表单上添加两个按钮 - 第一个按钮仅打开 Clientdataset，第二个按钮调用 clientdataset.refreshrecord；

运行应用程序，按下按钮打开数据集，数据显示在网格中。

按“刷新记录”按钮，您将收到 SQL 错误“连接字段的列名无效”。

关闭应用程序，打开SQLMonitor日志，在刷新记录Delphi生成的SQL语句中，你会看到它没有包含表连接语句。

====

我真的很感激任何关于如何解决这个问题的想法。

Answer 1

尝试在数据库上使用 View 来实现所需的连接。然后delphi组件可以只从view_name中进行选择，而不必自己处理连接。