Delphi-Komponente zum Parsen von XML-Dateien.

Lizenz: Siehe lizenz.txt in der Zip-Datei.

Version: 1.1

Entwickelt mit: Turbo Delphi 

Features:

• Automatische Ausgabe der Baumstruktur an ein TTreeView
• Tags über Pfadangabe (Bsp.: root\tag1\tag2) ansteuerbar
• Quelltextausgabe ab definiertem Tag

• XMLParser.pas
  
  Beschreibung:
  

  Liest XML-Dateien ein und gibt alle gesammelten Informationen an das TXMLDocument aus.
  

  Methoden:
  

  LoadFromFile(FileName : String)
  LoadFromStrings(Strings : TStrings);
  LoadFromText(Text : String);
  
  

• XMLDocument.pas
  
  Beschreibung:
  

  Enthalt eine mit dem XMLParser ausgelesene XML-Datei.
  

  Methoden:
  

  AddComment(Value : String) : TComment;
  AddTag(Tag : TXMLTag; Name, Value : String) : TXMLTag;
  Clear;
  CommentCount : Integer;
  DeleteTag(Tag : TXMLTag);
  FindTag(Name : String; SearchInTag: TXMLTag; SearchSubTags : Boolean) : TXMLTag;
  GetTagByPath(Path : String) : TXMLTag;
  (1.1) Procedure GetTagList(Path : String; List : TStrings; TagType : TTagType);
  GetXMLTree(TreeView : TTreeView);
  SaveToFile(FileName : String);
  SaveToText(Text : TStrings; FromTag : TXMLTag);
  
  

• XMLTag.pas
  
  Beschreibung:
  

  Das Object speichert Attribute, Namen und Subtags.
  

  Methoden:
  

  Procedure AddAttribut(Name, Value : String);
  (1.1) Procedure ChangeAttribute(Name, Value : String);
  Function AddTag(Name, Value : String) : TXMLTag;
  Function AsText : String;
  Function AttrCount : Integer;
  Function AttrExists(Name : String) : Boolean;
  Function CountTagsByName(Name : String) : Integer;
  Procedure DeleteAttribut(Index : Integer);
  Procedure DeleteTag(Index : Integer);
  (1.1) Function ForceTags(Path, Value : String) : TXMLTag;
  Function GetPath : String;
  Function GetTagIndex(Tag : TXMLTag) : Integer;
  Function TagCount  : Integer;