Forum: Programmieren allgemein
by exasoft,
4. Jan 2019
ich weiß, aber optimiert wird immer erst später ;-) Baue gerade ein DatenModul rein..
Forum: Programmieren allgemein
by exasoft,
4. Jan 2019
Moin @ALL,
also, habs jetzt so (s.u.) gemacht und klappt auch super (s. Anhang).
Bitte nicht über die ausführlichen Kommentare wundern - dient als Lehrstoff. Und falls noch jemand etwas anzumerken hätte - alls her damit.
Tks nochmal..
// json-antwort aufbereiten..
// entspr. objekte erstellen..
StringWriter := TStringWriter.Create();
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
Da bin ich auch grad drauf gekommen, als ich wieder in meinem Projekt war, Mist - bin schon völlig kirre! Ich brauche für jeden Datensatz 1 Objekt.
Ich habe mir jetzt nochmal das Ergebnis angesehen und eigentlich fehlt im Result zwischen den Objekten ja nur ein Komma. Der Builder schmeisst die dann logischerweise raus. Hmm..
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
haha, jetzt war ich so im "flow". Ich brauche ja auch nur 1 Objekt. Aber du hast mich da auf eine Idee gebracht - wird wohl spät werden heute. Ich poste mal was, wenn ich's hinbekommen habe. Tks und schönen Abend erstmal..
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
Danke und klar, aber ich hasse es einfach, wenn ich etwas nicht hinbekomme. Aber folgendes könnte doch ein Ansatz sein. Ich bekomme aber immer nur 1 Objekt hin :-(
Ergebnis:
sende:
{
"wowarer":
}
Hmm..
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
funktioniert beides nicht - hatte ich auch schon versucht.
Unit1.pas(144): E2361 Auf private-Symbol TJSONCollectionBuilder.EndArray kann nicht zugegriffen werden
Aber, wie gesagt, kommt er soweit ja garnicht. In der for-Schleife schmiert er ja schon ab ("dieser Vorgang ist nicht zulässig, nachdem Paare oder Elemente hinzugefügt wurden.").
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
@jaenicke: Hast ja recht - ich werde mich bessern. Steht jetzt auch auf der Liste..
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
übrigens betreffend:
komme ich nicht weiter.
sobald ich "scannen" bzw das 2. Mal auf Builder zugreifen will, bekomme ich "dieser Vorgang ist nicht zulässig, nachdem Paare oder Elemente hinzugefügt wurden."
Builder
.BeginObject
.BeginArray('wowarer');
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
ich habe da immer ne "unsichtbare" Protokollierung mitlaufen - debugger bin ich kein Fan von. Ich weiß... - aber das kann ich mir live bei Kunden ansehen, mailen lassen, etc.
Bin eigentlich auch kein großer Fan der ganzen neuen Gimmicks - aber man sollte sie halt kennen und manche sind auch echt cool. Trete halt seit rund 10 Jahren auf meinem "Wissen" rum und erlebe Delphi/FMX gerade "neu",...
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
so hatte ich es auch immer gemacht - dachte nur das ginge auch irgendwie mit dieser "Punktnotationsarie".
Danke..
// json-array für die rückgabe der daten erstellen..
a := TJSONArray.Create;
try
// DARF EIGTL NUR EINEN DS FINDEN - source aber für später so belassen
// auf ersten satz pos..
dm.qryWoIsser.First;
Forum: Programmieren allgemein
by exasoft,
3. Jan 2019
Moin,
arbeite mich gerade in "neuere Techniken" ein - komme aber mit folgendem Beispiel nicht klar.
(Daten per "neuem" JSONObjectBuilder-Objekt aufbereiten)
var
StringWriter: TStringWriter;
Writer: TJsonTextWriter;
Builder: TJSONObjectBuilder;
begin