Unit simplexmlparser

DescriptionUsesClasses, Interfaces, Objects and RecordsFunctions and ProceduresTypesConstantsVariables

Description

This file doesn't contain a xml parser.

But you can use the procedure parseXML to parse a xml file stored in a string. (although you should not expect, that this can actually parse the xml data)

*

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


Generated by PasDoc 0.14.0.