Forum: Datenbanken
by Ykcim,
19. Dez 2020
Hallo zusammen,
endlich habe ich einen Weg gefunden, um ein Logo in der Datenbank zu speichern und auch wieder zu laden...
Ich habe meine App komplett auf den Aufruf von Services umgebaut.
Wenn ich das Logo in das TWebImageControl geladen habe, kann ich es jederzeit mit WebImageControl1.Base64 als String bekommen. Ich habe festgestellt, dass ich diesen String zwar problemlos in ein...
Forum: Datenbanken
by Ykcim,
1. Dez 2020
Vielen Dank, Du hast Dir wirklich viel Mühe gegeben!
Wenn ich noch zu einer Lösung komme, werde ich sie hier posten...
Forum: Datenbanken
by Ykcim,
28. Nov 2020
Leider konnte ich Deinen Code nicht adaptieren. Obwohl die Autovervollständigung es angibt, meckert der Compiler bei BF.LoadFromStream(TS);
In TMS Web Core scheint es nicht verfügbar zu sein... oder ich begreife nicht, wie ich es korrekt aufrufen muss!
Ich habe das Feld mal in ein LongBlob umgewandelt. Ich kann Daten zwar reinspeichern, aber die sehen dann wieder komisch aus:...
Forum: Datenbanken
by Ykcim,
27. Nov 2020
Ich hatte es schon mit LONGTEXT versucht, aber hatte keinen Erfolg. Trotzdem glaube ich, dass da das Problem liegt.
Die Zeichen sehen anders aus, wenn ich mir das VARCHAR Feld binär ansehe und das LongText Feld. IM VARCHAR (data:image/png;base64,iVBORw0KGgoAAAANSU...) kann ich die Daten lesen und im LONGTEXT (뎵½辵뾹؞��ܞ¶) sind die Zeichen anders.
Auch die Größe ist unterschiedlich. IM...
Forum: Datenbanken
by Ykcim,
25. Nov 2020
Ich habe gerade mal den Base64 String, bevor er in die Datenbank geschrieben wurde abgefangen und in eine TextDatei kopiert. Dort habe ich Zeilenumbrüche, Hockommas und Pluszeichen eingefügt und dann in folgende Procedure kopiert:
...
Forum: Datenbanken
by Ykcim,
25. Nov 2020
Die Applikation, die ich gerade versuche ist eine Web-Application mit TMS Web Core.
Ich habe das Image (TWebImageControl) jetzt geschafft in ein Blob-Feld zu speichern:
procedure TForm_TVclient_Main.WFP3Change(Sender: TObject);
var Img_URL: string;
Image_File: TJSHTMLFile;
Img_Base64: string;
begin
if Assigned(WFP3.Files) then begin
Forum: Datenbanken
by Ykcim,
24. Nov 2020
Vielen Dank.
Sag mal kannst Du mir sagen, was der Unterschied zwischen einem TStream oder TMemoryStream und einen JSONStream ist? Ich bekomme die Dinger leider nicht ausgelesen, damit ich mir die Struktur ansehen kann...
Gruß
Patrick
Forum: Datenbanken
by Ykcim,
24. Nov 2020
Das habe ich auch versucht, aber LoadFromStream kennt er angeblich nicht...