什么是将Delphi对象树序列化到
XML的好方法 – 使用RTTI而不是自定义代码？
我本来希望发现这个功能已经在Delphi中构建了,但似乎并不是这样.
我发现了一些组件(发布在下面),看起来他们可能会执行这个功能.你有没有使用过任何一个或其他产品？你建立了自己的？我在Delphi中缺少一些明显的东西吗？
解决方法
您可以使用JVCL TJvAppXMLFileStorage组件来序列化TPersistent派生类.
uses
JvAppXMLStorage;
var
Storage: TJvAppXMLFileStorage;
begin
Storage := TJvAppXMLFileStorage.Create(nil);
try
Storage.WritePersistent('',MyObject);
Storage.Xml.SaveToFile('S:\TestFiles\Test.xml');
Storage.Xml.LoadFromFile('S:\TestFiles\Test.xml');
Storage.ReadPersistent('',MyObject);
finally
Storage.Free;
end;
end;