XML konvertálása HTML formátumra

var
  XMLDoc: IXMLDOMDocument;
  XSLDoc: IXMLDOMDocument;
…
    XMLDoc:=CoDOMDocument.Create;
    XSLDoc:=CoDOMDocument.Create;

    XMLDoc.Load(ExtractFilePath(Application.ExeName)+'test.xml');
    XSLDoc.Load(ExtractFilePath(Application.ExeName)+'test.xsl');

    Memo4.Text:=XMLDoc.transformNode(XSLDoc);
    Memo4.Lines.SaveToFile(ExtractFilePath(Application.ExeName)+'test.htm');

    WebBrowser1.Navigate(ExtractFilePath(Application.ExeName)+'test.htm');