Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Hobbycoder,
25. Mär 2017
Ich habe das mit den enumererationen jetzt so gelöst, in dem ich mir eine Helperklasse angelegt habe, in die der Json geparst wird. Danach überführe ich das in die Zielklasse mit entsprechenden Umsetzungen. Nicht die schönste Lösung, aber für meine Zwecke reichst.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Hobbycoder,
23. Mär 2017
Und ein Problem hab ich dann doch noch.
Ich habe ja 2 Properties als enumeration type.
TEMStatus=(emsNeu, emsIB, emsKorr, emsGepr);
TEMDringlichkeit=(emdLowest, emdLower, emdNormal, emdHigh, emdHighest);
property Status: TEMStatus read FStatus write SetStatus;
property Dringlichkeit: TEMDringlichkeit read FDringlichkeit write SetDringlichkeit;
Das würde ich auch gerne so...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Hobbycoder,
23. Mär 2017
Danke ;-) Das funktioniert ja wie geschnitten Brot ;-)
Zu meinem Verständnis: Die Voraussetzungen sind, nehme ich mal an, dass a) der JSON-String NUR ein Array enthält, und b) die Bezeichner für die Values innerhalb des Array den Properties des Objekts entsprechen?
Wie findet die Funktion denn die passenden Properties? Und werden die Typen immer passend umgewandelt (String, Int, TDatetime,...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Hobbycoder,
23. Mär 2017
Hi,
ich versucht seit Stunden ein JSON-String zu parsen, aber ich raff's nicht. Ich könnte mal ein bisschen Schützenhilfe von euch gebrauchen ;-)
Mein JSON-String sieht so aus:
Ziel ist es alle Elemente des Array in Objekte zu überführen.
Die Objekte sehen (etwas gekürzt) so aus:
TErrorMessage=class
property Lfdnr: Integer read FLfdnr write SetLfdnr;