怎样在delphi6程序中自动生成xml文件，需要什么控件，请给个具体例子，一定送分?

Question

1、字符串处理
2、TClientDataset.SaveToFile(FileName, dfXML);

Answer 1

DELPHI5中的ClientDataSet公文包功能就能办到

Answer 2

//建立试题xml文件的头部
function TForm.CreateXmlHeadFile: ixmlNode;
var
   xmlStr:string;
   fp:integer;
begin
  xmlStr:='<?xml version="1.0" encoding="gb2312"?>';
  xmlStr:=xmlStr+'<!--hahahhahahhahah  Co,Ltd.-->';
  xmlStr:=xmlStr+'<!--create time: '+DateToStr(date)+'   '+timetoStr(time)+' -->';
  xmlstr:=xmlstr+'<questestinterop></questestinterop>';
  fp:=filecreate('test.xml');
  filewrite(fp,xmlstr[1],length(xmlstr));
  fileclose(fp);
  XmlDoc:=TXMLDocument.Create(application);
  XmlDoc.LoadFromFile('test.xml');
end;然后对xmlDoc操作。

Answer 3

1.xmlDocument 
2.AdoQuery等Ado控件
3.ClientDataSet