是否可以拍摄数据集快照？

Question

在我的应用程序中，我专门使用 DBAware 组件（少数地方除外）。

我有一个场景，其中创建主数据集（例如客户）、详细数据集（例如订单）、子详细数据集（例如订单项）。通常，我允许用户进行更改（数据集处于浏览模式），然后我发布。简单的。

无论如何，在编辑子数据集时，我想添加一种简单的撤消功能：打开一个表单来编辑数据集（即使用数据库组件，因此对表单的更改将更改数据集），如果用户取消操作，我会喜欢将数据集恢复为打开表单之前的状态。

现在，为了实现这一点，我可以考虑在 TClientDataSet 或类似组件中创建数据集的副本，但是还有其他技术吗？就像使用 Delphi 可以以简单的方式创建数据的“快照”一样。使用伪代码：

MySubDetailDataSet.SaveSnapShot;
SubDetailForm.ShowModal;
if ModalResult = mrCancel then MySubDetailDataSet.RestoreSnapShot;

使用 Delphi 组件是否可以“现成”类似的东西？

顺便说一句，我使用 DevArt 组件中的 SDAC，因此，如果您知道一种仅适用于这些组件而不适用于 Delphi 标准组件的技术，那么欢迎您！

Answer 1

在客户端数据集中，更改存储在增量中 - 您可以调用 CancelUpdates 来清除增量并恢复到原始数据集。还有其他更细粒度的方法。请参阅帮助中的“撤消更改”。

如果您使用的是 RDBMS 并且正确地处于事务内部，则可以回滚该事务。某些数据库提供保存点来回滚到给定的保存点，而不是回滚整个事务，但这是特定于数据库的。事务通常是按会话进行的，而不是按单个表或查询进行的。您必须确保在给定事务中仅执行可能需要回滚的更改。

客户端数据集可能是一种“较轻”的方法，因为它们仅管理客户端数据并且不需要数据库资源。当您处于数据库内的事务中时，需要一些资源来跟踪它和更改的数据。交易时间应根据需要而定，但不能更长。

还要注意事务可能意味着一些锁定。不同数据库的锁管理可能有很大不同，有些可能会升级锁，从而阻止比需要的更多的用户。始终使用足够数量的并发用户进行测试，以确保正确使用事务。

Answer 2

在 AnyDAC 中，您可以执行以下操作：

var
 iPrevSP: Integer;
...
iPrevSP := MySubDetailDataSet.SavePoint; 
SubDetailForm.ShowModal; 
if ModalResult = mrCancel then 
  MySubDetailDataSet.SavePoint := iPrevSP; 

使用 TClientDataSet、kbmMemTable 可以访问类似的技术。可能不是答案，因为您正在使用 DevArt 产品。

Answer 3

通过 DevArt，我成功地将数据复制到 TVitualTable（TCLientDataSet 的 DevArt 版本），无论如何，SavePoint 功能不像 AnyDAC 那样简单。

Answer 4

您可以使用 TClientDataset 并从文件或流加载它，并将原始数据保存在里面，每次要回滚时，从原始数据重新加载它。