Versionen im Vergleich

Schlüssel

  • Diese Zeile wurde hinzugefügt.
  • Diese Zeile wurde entfernt.
  • Formatierung wurde geändert.

Parameter

() : Boolean;

Beschreibung

Die Methode ClearStartElement löscht das aktuelle Startelement (Wurzelknoten) und geht wieder auf das ursprünglich mit der Initialisierung gesetzte Objekt zurück. Mit mehreren diversen Methoden, die alle deren Namen mit OpenNode beginnen, kann ein neues das Startelement individuell gesetzt neu gesetzt werden. Im Beispiel wird über GetObjectCount ermittelt, wie viele Objekte unter RESULTS vorhanden sind. Danach ermittelt das Skript ob der Betrag, der in DMBTR steht, größer als 200 Euro ist. Ist das der Fall, wird mit OpenNodeInArray der Wurzelknoten auf RESULTS das Jte Objekt im ResultArray gesetztauf den Unterknoten "Inhaber" der Startknoten gesetzt und ein Wert aus diesem Knoten gelesen. Anschließend wird der Startknoten wieder zurückgesetzt, damit ein Wert aus obersten Knoten gelesen werden kann.

Info
titleHinweis

Ab dem Zeitpunkt bezieht sich jeder Pfad immer auf den Wurzelknoten weshalb am Ende wieder der Wurzelknoten zurückgesetzt werden muss.

Beispiel

Codeblock
languagedelphi
linenumberstrue
forvar Json i:= 0 to ResultCount - 1 do
 TccJson;
begin
  AmountJson := JSONWorker.GetValueFromArrayAsFloat('RESULTS',i,'DMBTR',0 )TccJSON.Create;
  iftry
Amount > 200 then
  begin
    if JSONWorkerJson.OpenNodeInArrayLoadFromFile('RESULTS',ic:\Konto.json') = true then
    begin
      Content := 'Datensatz über 200: '+crlfJson.OpenNode('Inhaber');
      for j := 0 to JSONWorker.GetNodeCount()-1 doShowMessage(Json.GetValueAsString('Name','Error') );
      begin
        Content := Content + VarToStr(JSONWorker.GetNodeNameByIndex(j)) + ':'Json.ClearStartElement();
        Content := Content + VarToStr(JSONWorker.GetNodeValueByIndex(j))+ crlfShowMessage(Json.GetValueAsString('Bank','Error') );
      end;
  finally
   showMessage(Content);
      Content := '' Json.Free;
    end;
 
end;

Inhalt

Untergeordnete Seiten (Anzeige untergeordneter Seiten)
alltrue
depth2