VerySimpleXML: Problem unter iOS?

[Union]

Bei mir XE5. Schau mal das debug im Bild. Du siehst dass in S bereits " </Z" steht und IsSelfClosing auf True gesetzt wurde. Dadurch wird dann ein weiteres " /" angehängt. Passiert im GetText in der 12. Recursion von Walk().

[romber]

Zitat:

Zitat von cydo (Beitrag 1240544)

Unter welcher Delphi Version tritt denn das Problem auf?

Ich teste es unter XE5.

[cydo]

Aber nur unter iOS? Unter Windows tuts bei mir.

Ich muss das mit iOS jetzt erstmal einrichten ;-)

[cydo]

Ich hab da mal ne 1.4 von der XML-Unit, da war noch was mit UTF im header in der v1.3 behoben, möglicherweise wars das dann schon?

[Insider2004]

Ist die 1.4 von Dennis?

[cydo]

Zitat:

Zitat von Insider2004 (Beitrag 1240552)

Ist die 1.4 von Dennis?

ja, ich bins ;-)

[cydo]

Also ich denke ich weiss woher's kommt:

zeile 240:

Delphi-Quellcode:

while (Length(Line) > 0) and (Line[1] <> '<') do
          delete(Line, 1, 1);

die bricht zu früh ab - Die Variable Line sollte danach direkt mit "<" anfangen,
tut es aber nicht: " <A..", also ein Leerzeichen zuviel. Erst dachte ich, ah ok,
wir indizieren jetzt dann wie angekündigt mit 0, aber ein Line[0] meckert rum.
Mal sehen wie ich das kompensieren kann...

[Union]

Das ist wohl ein Fehler in system. Die Schleife wird einmal durchlaufen und das delete wird durchgeführt. Dann wird die Abfrage true. Nach Verlassen der Schleife ist jedoch noch eine Leerstelle am Anfang von Line.

[Insider2004]

Zitat:

Zitat von cydo (Beitrag 1240554)

Zitat:

Zitat von Insider2004 (Beitrag 1240552)

Ist die 1.4 von Dennis?

ja, ich bins ;-)

Das kann wohl jeder sagen! ;-)

[cydo]

So, das ist ja wirklich lustig.
Debug Point bei
Zeile 240:

Delphi-Quellcode:

    Line := Lines[I];

Dann den Header einmal überspringen, bis <doc> drin steht (also zweite line). Der Aufruf

Delphi-Quellcode:

    while (Length(Line) > 0) do
    begin
     ..
        while (Length(Line) > 0) and (Line[1] <> '<') do
          delete(Line, 1, 1);

Macht auf Win32 das was es soll: Nämlich gar nix mit der Line, da die mit Line[1]='<' anfängt. Unter iOS allerdings schon, der Debugger sagt zwar
Line[1]<>'<' => False aber hüpft trotzdem in die delete routine. Mach ich jetzt mal ein verwegenes

Delphi-Quellcode:

    while (Length(Line) > 0) do
    begin
      ..
        while (Length(Line) > 0) and (Line[0] <> '<') do
          delete(Line, 1, 1);

also mit Index = 0 draus, dann tuts. Hab ich was verpasst? Indizieren wir die Strings jetzt unter NextGen mit 0? Mir war da was.. aber ich find grad nix auf anhieb im web

Nachtrag:
{$ZEROBASEDSTRINGS OFF}

oben im Kopf in der unit XML.VerysimpleXML reinpappen und schon gehts.... also doch 0-Index Strings in NExtGen... na da muss ja mal einer draufkommen...