delphi 如何把字符串转化为xml,最好只提供读取就好了,不用保存

2024-12-19 16:44:12
推荐回答(2个)
回答1:

转化其实就是按着xml的方式进行写入就可以了!
方法
1。直接按着xml格式写入;
2. 用组件完成写入,TXMLDocument,NativeXml

回答2:

i_xml := Tstringlist.Create;
if not fileexists('Memo.xml') then
i_xml.SaveToFile('Memo.xml');

i_xml.LoadFromFile('Memo.xml');
i_xml.Clear;
i_xml.SaveToFile('Memo.xml');
i_xml.Add(' ');
i_xml.Add('');
i_xml.Add(''); //编号
i_xml.Add(''); //编号
i_xml.Add(''); //
i_xml.Add('
');
i_xml.SaveToFile('Memo.xml');
finally
i_xml.Free;
end;

调用
ClientDataSet1.LoadFromFile(ExtractFilePath(Application.ExeName) +
'Memo.xml');