上网查了N久，Delphi下将XML利用XSL转换成XML，一般都使用了DOM接口，经过试验，其实有一种简单的转换方式，就是使用XMLDocument控件：
1、创建两个XMLDocument实例，分别命名为xmldoc和xsldoc
2、利用LoadFromFile函数分别载入被转换的xml文件和xsl文件
3、转换函数如下：
function transformxml(xmlfile: string; xslfile: string): WideString;
begin
xmldoc.LoadFromFile(xmlfile);
xsldoc.LoadFromFile(xslfile);
xmldoc.DocumentElement.TransformNode(xsldoc.DocumentElement, result);
end;
函数返回值为转换之后生成的源码
