TJSONObject.GetValue liefert immer Werte in doppelten Hochkommas

[exasoft]

Hallo @ALL,
ich arbeite mich gerade etwas in REST ein und habe da ein kleines Problem - ist bestimmt nix Wildes ;-)

Wenn ich die Werte auslese
zB so:
var
o: TJSONObject;
begin
o := FJSONArray.Items[FCurrentIndex] as TJSONObject;
edStrasse.Text := o.GetValue('strasse').ToString;

, um sie anzuzeigen, dann stehen die in edStrasse.Text immer mit beginnendem und abschliessendem dopp. Hochkomma "hinterm Berg".

Ist das nur ne Einstellung oder was mache ich falsch/fehlt da?

Wäre super..

Tks vorab

[Der schöne Günther]

Es gibt einmal

Delphi-Quellcode:

GetValue(..)

und

Delphi-Quellcode:

GetValue<T>(..)

.


Du kannst die Werte direkt als String, Integer, Single usw. auslesen indem du die generische Version benutzt:

Delphi-Quellcode:

edStrasse.Text := o.GetValue<String>('strasse');

[exasoft]

Danke erstmal für die Info, aber irgendwie verstehe ich das nicht.

Ich habe die Sourcen 1:1 aus einem Delphi-Skill-Sprint übernommen und da gabs dieses Problem nicht.
(https://www.youtube.com/watch?v=_P6waeTlhVc)

Auf jeden Fall Tks - ich versuche es mal so und schaue mir die Objekte mal näher an, was da evtl. noch so geht.

RW

[Schokohase]

Delphi-Quellcode:

TJSONValue.ToString()

macht das Gleiche wie

Delphi-Quellcode:

TJSONValue.ToJSON()

und liefert den Wert als JSON zurück.

Ein JSON-String ist nun mal ein String mit Quotes.

Wenn du einfach nur den Wert (des JSON-String) haben möchtest, dann nimm

Delphi-Quellcode:

TJSONValue.Value()

.

[TigerLilly]

Vorsicht:

Code:

ToString
public
Returns a string containing the class name.

[Schokohase]

Zitat:

Zitat von TigerLilly (Beitrag 1421209)

Vorsicht:

Code:

ToString
public
Returns a string containing the class name.

Nein, tut es nicht und ein Klick entfernt findet man das:

Delphi-Quellcode:

function TJSONAncestor.ToString: string;
var
  Buf: TStringBuilder;
begin
  Buf := TStringBuilder.Create(256);
  try
    ToChars(Buf);
    Result := Buf.ToString(True);
  finally
    Buf.Free;
  end;
end;

Wie so oft ist die Dokumentation nur ein Anhaltspunkt, gerade wenn wir es mit virtuellen Methoden zu tun haben.

[TigerLilly]

Missverständnis: Ich wollte darauf hinweisen, was ToString üblicherweise macht. Dass ToString hier was anderes als den Klassennamen zurückliefert, ist eine Ausnahme (deren Sinn ich nicht sehe).

[Schokohase]

Zitat:

Zitat von TigerLilly (Beitrag 1421212)

Missverständnis: Ich wollte darauf hinweisen, was ToString üblicherweise macht. Dass ToString hier was anderes als den Klassennamen zurückliefert, ist eine Ausnahme (deren Sinn ich nicht sehe).

Die Methode

Delphi-Quellcode:

ToString

ist dafür da um eine String-Repräsentation der Klassen-Instanz zu bekommen. Diese Methode ist erstmalig bei

Delphi-Quellcode:

TObject

als

Delphi-Quellcode:

virtual

definiert (soll heißen: kann und darf überschrieben werden) und dort liefert diese einfach nur den Klassennamen zurück.

Diese Methode ist nicht dazu gedacht, den Klassennamen zu erhalten, das geht wesentlich besser über andere Wege.

So steht es auch in der Dokumentation:

Zitat:

Note:

Delphi-Quellcode:

ToString

is intended to be overridden in user-derived classes, to provide consumer objects with a string representation.

[Der schöne Günther]

TObject.ToString() ist nur so implementiert damit man überhaupt etwas hat. Besser als nichts 🤷

[rd3]

Hallo,

o.GetValue('strasse').Value;

sollte gehen. ToString ist hier nicht für gedacht.

[exasoft]

mich hat nur gewundert, dass es im Video-Beispiel eben genau so funktioniert hatte :-(

[Schokohase]

Zitat:

Zitat von exasoft (Beitrag 1421243)

mich hat nur gewundert, dass es im Video-Beispiel eben genau so funktioniert hatte :-(

Sag doch mal die Minute:Sekunde wo das in dem Video zu sehen ist.