1.取得可文件路径 Path := ExtractFilePath(Application.ExeName); //取得可执行文件路径 TXMLDocument.Create(ExtractFilePath(Application.ExeName)+ '001.xml') 2.DisableControls EnableControls ClientDataSet.DisableControls; ... for I := 0 to 10000 do begin ClientDataSet.Ap…
uses XMLIntf, XMLDoc; XML to XTR文件转换 .File-->open打开你要分析的XML文件 .在左边选择你要分析的接点,双击加到中间的转换列表中 .Create-->DataPacket from XML .Create and Test Transformation .file-->save-->Transformation得到一个.xtr的文件 .打开.xtr文件,第一行找到"><SelectEach dest="…
uses XMLIntf, XMLDoc; XML to XTR文件转换 .File-->open打开你要分析的XML文件 .在左边选择你要分析的接点,双击加到中间的转换列表中 .Create-->DataPacket from XML .Create and Test Transformation .file-->save-->Transformation得到一个.xtr的文件 .打开.xtr文件,第一行找到"><SelectEach dest="…