WaBis

walter.bislins.ch

Wxml: Speicher-Funktionen

Über die Serialize und Parse Funktionen lassen sich WxmlTag-Hierarchien in Strings umwandeln und umgekehrt. Diese Strings im WXML-Format können z.B. einfach zur permanenten Datenspeicherung in Dateien geschrieben werden.

Serialize

s = wxmlTag.Serialize()
wxmlTag: CXmlTag

Wandelt die Tag-Hierarchie, repräsentiert durch den Root-Tag wxmlTag, in einem String im WXML-Format um. Dieser String kann in einer Datei gespeichert werden oder mit der Funktion Parse wieder in eine Tag-Hierarchie zurück verwandelt werden.

Beispiel: Speichern eines Objektes im WXML-Format

class MyClass
  :

  private sub SaveToXml( aXml )
    ' stores this class into an CXmlTag hierarchy of aXml
    ' aXml as CXmlTag
    :
  end sub

  sub SaveToFile( aFilename )
    dim rootTag, sWxmlFormat
    set rootTag = NewXmlTag( "" )
    SaveToXml rootTag
    sWxmlFormat = rootTag.Serialize()
    FS.WriteFile aFilename, sWxmlFormat
  end sub

  :
end class

Parse

wxmlTag.Parse aWxmlString
wxmlTag: CXmlTag
aWxmlString: string
String im WXML-Format

Wandelt den String aWxmlString im WXML-Format in eine Tag-Hierarchie um, welche im Objekt wxmlTag gespeichert wird. Kommentare im HTML-Format werden vor dem Parsen herausgefiltert (aWxmlString wird nicht verändert).

Wenn wxmlTag kein leeres Root-Tag ist, werden die erzeugten Tags der bestehenden TagListe von wxmlTag angehängt.

Beispiel: Laden eines Objektes aus einer Datei im WXML-Format

class myClass
  :

  sub LoadFromXml( aXml )
    ' Stores values from aXml tag hierarchy into this classes properties
    ' aXml as CXmlTag
    :
  end sub

  sub LoadFromFile( aFilename )
    dim sWxmlFormat, rootTag
    sWxmlFormat = FS.ReadFile( aFilename )
    set rootTag = NewXmlTag( "" )
    rootTag.Parse sWxmlString
    LoadFromXml rootTag
  end sub

  :
end class

Weitere Infos zur Seite
Erzeugt Sonntag, 21. November 2010
von wabis
Zum Seitenanfang
Geändert Freitag, 19. Juli 2013
von wabis