WHAT'S NEW

Version 1.3

added Delphi/C++ Builder 10.4 files
minor improvements

const
XmlFileExtension = '.xml';
XmlMIME = 'application/xml';

type
TXmlNode =
(
xnNone,
xnElement,
xnAttribute,
xnText,
xnCData,
xnProcessingInstruction,
xnComment,
xnDocumentType,
xnWhitespace,
xnEndElement,
xnXmlDeclaration
);

TXmlReader = class
public
constructor Create(Stream: IStream; const Encoding: string = '');
constructor Create(Stream: TStream; const Encoding: string = '');
constructor Create(const FileName: string; const Encoding: string = '');

procedure Attribute(const Name: string; const Namespace: string = '');
procedure Element;
procedure FirstAttribute;
procedure NextAttribute;
function Read: Boolean;

property AttributeCount: Integer read;
property Depth: Integer read;
property EmptyElement: Boolean read;
property Eof: Boolean read;
property Line: Integer read;
property Name: string read;
property Namespace: string read;
property Node: TXmlNode read;
property Position: Integer read;
property Prefix: string read;
property QualifiedName: string read;
property Reader: IXmlReader read;
property Value: string read;
end;

TXmlWriter = class
public
constructor Create(Stream: IStream; const Encoding: string = '');
constructor Create(Stream: TStream; const Encoding: string = '');
constructor Create(const FileName: string; const Encoding: string = '');

procedure StartDocument;
procedure EndDocument;

procedure StartElement(const Name: string; const Prefix: string = ''; const Namespace: string = '');
procedure EndElement;

procedure Attribute(const Name: string; const Value: string; const Prefix: string = ''; const Namespace: string = '');
procedure CData(const dаta: string);
procedure Comment(const Text: string);
procedure Raw(const dаta: string);
procedure Text(const Text: string);

procedure Flush;

property Indent: Boolean read write;
property Writer: IXmlWriter read;
property XmlDeclaration: Boolean read write;
end;