Unit simplexmlparser

Description

This file contains something similar to an XML parser.

Use procedure parseXML to parse an XML file. It actually calls the HTML parser, not an XML parser, but it works reasonable well

*

Overview

Classes, Interfaces, Objects and Records

Name	Description
Record TProperty

Functions and Procedures

procedure parseXML(xml:string; enterTag:TEnterTagEvent; leaveTag: TLeaveTagEvent; textRead: TTextEvent; outputEncoding: TSystemCodePage);

function getProperty(propertyName: string; properties:TProperties; const def: string = ''):string;

procedure addProperty(propertyName,value: string;var properties:TProperties);

procedure setProperty(propertyName,value: string;var properties:TProperties);

Types

TProperties=array of TProperty;

TEnterTagEvent = function (tagName: string; properties: TProperties):TParsingResult of object;

TLeaveTagEvent = function (tagName: string):TParsingResult of object;

TTextEvent = function (text: string):TParsingResult of object;

Description

Functions and Procedures

procedure parseXML(xml:string; enterTag:TEnterTagEvent; leaveTag: TLeaveTagEvent; textRead: TTextEvent; outputEncoding: TSystemCodePage);

Perhaps this parses xml data, perhaps it doesn't. Who knows... Parameters xml The xml data enterTag Event to be called when a tag is entered leaveTag Event to be called when a tag is leaved textRead Event to be called when text between tags is read outputEncoding Encoding to be used in the parameters passed to the event

function getProperty(propertyName: string; properties:TProperties; const def: string = ''):string;

procedure addProperty(propertyName,value: string;var properties:TProperties);

procedure setProperty(propertyName,value: string;var properties:TProperties);

Types

TProperties=array of TProperty;

TEnterTagEvent = function (tagName: string; properties: TProperties):TParsingResult of object;

TLeaveTagEvent = function (tagName: string):TParsingResult of object;

TTextEvent = function (text: string):TParsingResult of object;

Author

• Benito van der Zander (www.benibela.de)

---

Generated by PasDoc 0.16.0.