本来说是要给自己的某程序加一个xml导出功能,但是自己也没接触过xml,加之delphi和lazarus的xml部分还都不一样,折腾好久(整一天)才解决问题.. 如下是作为导出功能的组件部分: unit treexml; interface uses msxml2_tlb, ComCtrls, dialogs, sysutils, ActiveX; type // saves TTreeView as XML file. TTreeViewToXML = class private doc: I…