delphi - Delphi XE3 - 将数据从 TBytesField 复制到另一个 TBytesField

Question

我有一个带有 TBytesField 的 ADO 数据集（DataSet1），该字段的 DataSize 为 12。

我想将 TBytesField 数据复制到另一个具有 DataSize 12 的 TBytesField 的 DataSet。

我使用下面给出的代码行将字段值从 DataSet1 复制到 DataSet2：

DataSet2.Fields[0].Value := DataSet1.Fields[0].Value.

此代码在 Delphi 2009 中工作，但在迁移到 Delphi XE3 后，这不再工作了。尝试设置值时会引发错误“无效的变体类型” 。我尝试使用GetData，SetData但出现了同样的错误。

我认为设置数据时 Delphi XE3 ADODB 代码存在错误。

有人遇到过这个问题吗？有什么建议么？