Hallo Zusammen,
Arbeite mit D2007 und der Bibliothek uLKJson
Generieren der PDF in ein BASE64 String alles wunderbar.
Jetzt kommt es
wenn der BASE64 String nur an das JSON Object übergeben wird und dann später das JSONObject seine Methode generateTEXT aufruft, dann wird auch auf einmal der BASE64 String verändert.(Das hätte ich niemals erwartet)
Manchmal ist dann doch besser einfach alles als String aufzubearbeiten
XML,JSON und Co. bevor hier die 3thParty Komponenten alles kaputt machen
Kennt sich jemand evtl. mit diesem Problem Base64 und uLkJSON.pas(06.11.2009) aus?
TlkJSON = class
public
class function ParseText(const txt: string): TlkJSONbase;
class function GenerateText(obj: TlkJSONbase): string;
end;
js := TlkJSONstring.Create;
{$ifdef USE_D2009}
js.FValue := UTF8ToString(ws);
{$else}
js.FValue := UTF8Decode(ws);
{$endif}
add_child(o, TlkJSONbase(js));
ridx := idx;
end;
JSON Zeichenkette ansonsten generiert und via TStringlist als JSON Datei gespeichert. Funktioniert wenigstens
Danke Euch.