Làm cách nào để hiển thị XML bằng tài liệu XSLT, trong ứng dụng Delphi?

Question

Tôi đã được cung cấp một tệp XML mẫu (cuối cùng khách hàng của tôi sẽ nhận được một số tệp này mỗi ngày) và tệp XSLT sẽ chuyển XML thành một thứ có bố cục có ý nghĩa, phù hợp để hiển thị trong trình duyệt hoặc in.

Tôi muốn đặt thứ gì đó vào ứng dụng Delphi cũ, như vậy người dùng có thể chọn một trong các tệp XML từ ổ đĩa và 'hiển thị' nó (trong TWebBrowser hoặc tương tự).

Tôi không biết bắt đầu từ đâu, và Googling delphi, xml và xslt lấy cho tôi các ví dụ có vẻ là datamodule/database based; Tôi chỉ muốn chuyển đổi một tệp XML đã cho thành một thứ gì đó trên màn hình. Dường như nó có thể liên quan đến một PageProducer nhưng tôi không thể có được đầu của tôi xung quanh những gì tôi cần phải làm. Bất cứ ai cung cấp bất kỳ con trỏ, hoặc có thể là một liên kết đến một hướng dẫn nhanh?

Rất cám ơn!

Answer 1

Uses 
    XMLDoc, XMLIntf; 

function Transform(XMLContent : string; XSLContent : string) : WideString; 
var 
    XML : IXMLDocument; 
    XSL : IXMLDocument; 
begin 

    XML := LoadXMLData(XMLContent); 
    XSL := LoadXMLData(XSLContent); 

    XML.DocumentElement.TransformNode(XSL.DocumentElement, Result) 

end; 

Answer 2

Tôi đã sử dụng thư viện MSXML để thực hiện phép chuyển đổi XSLT trong Delphi. Đã lâu lắm rồi. Làm việc như người ở!

Tôi không chắc định dạng XSLT đầu ra của bạn sẽ tạo ra, nhưng biết điều đó sẽ giúp bạn tìm ra cách hiển thị nó. Chúng tôi đã tạo HTML từ XML qua XSLT và hiển thị nó bằng cách sử dụng điều khiển Trình duyệt web ActiveX (IE) trên một ngăn trong ứng dụng của chúng tôi.

Đây là một số link on MSSXML and Delphi có thể hữu ích.

BTW: Nếu đây là lần đầu tiên bạn làm việc với XSLT, bạn có thể chỉnh sửa thủ công tệp XML và thêm chỉ thị để hiển thị nó bằng XSLT cụ thể. Khi bạn mở XML trong Firefox sau khi chỉnh sửa, XSLT sẽ được áp dụng, và nó sẽ cho bạn thấy những gì sẽ là đầu ra của các cuộc gọi MSXML của bạn. Đây là dòng bạn thêm bằng tay để xml:

<?xml-stylesheet type="text/xsl" href="myStyleSheet.xsl"?> 

Answer 3

Nếu bạn chỉ cần biến đổi, bạn có thể sử dụng TXMLDocument, lưu vào đĩa và hơn hiển thị kết quả trong một TWebBrowser (thông qua Navigate('file:///...')).

Cá nhân tôi có một số vấn đề với MSXML nên tôi bắt đầu sử dụng DIXML.

Answer 4

Bạn có thể thử cài đặt AltovaXML, có thể gọi là COM +. Nó là miễn phí và có thể tải về từ: http://www.altova.com/altovaxml.html

MSXML có thể chỉ làm việc với XSLT 1.0 nhưng AltovaXml thể làm việc với XSLT 2.0