Выполнение XSLT-преобразований в Object Pascal

Импорт MSXML в Delphi
Форма проекта
Использование DOMDocument

В этой главе мы приведём пример использования XSLT-преобразований в простом проекте, созданном в среде разработки Delphi. Базовым языком Delphi является Object Pascal. Решение, которое мы предложим, будет основываться на использовании библиотеки MSXML Parser 3.0 от Microsoft.

Небольшое приложение, которое мы создадим, будет преобразовывать XML-документ (по умолчанию — «source.xml») при помощи XSLT-преобразования (по умолчанию — «stylesheet.xsl») и показывать результат преобразования.

Импорт MSXML в Delphi

Первым шагом после создания нового проекта (назовём его DelphiXML) будет импортирование библиотеки типов MSXML. Это позволит использовать в программе классы, интерфейсы и методы MSXML, в том числе и XSLT-процессор.

Для того чтобы импортировать библиотеку типов MSXML, выберем пункт меню Project/Import Type Library... (рис 9.1).

Импорт MSXML — шаг 1

Рисунок 9.1. Импорт MSXML — шаг 1

В появившемся диалоге выберем пункт «Microsoft XML v3.0 (Version 3.0)» и создадим новый модуль кнопкой Create Unit (рис 9.2).

Импорт MSXML в Delphi

Рисунок 9.2. Импорт MSXML в Delphi

Получившийся файл MSXML2_TLB.pas присоединим к проекту (Project/Add to Project...); теперь можно приступать к работе.

Для того чтобы использовать MSXML в нашем проекте, нам потребуется включить модуль MSXML2_TLB в список используемых модулей. Кроме того, для обработки исключений нам также потребуется модуль comobj. В итоге объявление uses будет выглядеть следующим образом:

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls,
  Forms, Dialogs, StdCtrls, ComCtrls, MSXML2_TLB, comobj;