如何将Delphi OleVariant内容转储到文件中？

Question

我有一个多层应用程序，该应用程序使用OleVariant变量通过自定义通信框架跨线发送和接收数据。通常，此OleVariant变量的内容来自TClientDataSet.Data（当然，它是OleVariant类型的）。我怀疑通信框架会更改此OleVariant变量的内容，因此我想在发送和接收数据之前转储该变量的内容。我使用代码：

TmpOrder: OleVariant;
Tmp: TStringList;

Tmp:=TStringList.Create;
Tmp.LoadFromFile('D:\test.txt');
Tmp.Add('---');
Tmp.Add(TmpOrder);
Tmp.SaveToFile('D:\test.txt');
Tmp.Free;

但是文件的内容没有意义。例如，文件的以下内容可以表示TClientDataSet.Data的内容：

---
??

当然，发生了一些不同的事情。

所以-如何捕获OleVariant变量的内容。

将TClientDataSet保存为XML并不是我的选择，因为通信使用OleVariant而不是XML。

我正在使用Unciode Delphi（Delphi 2009及更高版本。）>

我有一个多层应用程序，该应用程序使用OleVariant变量通过自定义通信框架跨线发送和接收数据。通常，此OleVariant变量的内容来自...

Answer 1

这里有一些代码将TClientDataSet.Data转换为字符串和一个执行该例程的测试例程。