Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
Delphi 10.4 Sydney
|
AW: Bild in MySQL (Blob) mit mysql.pas speichern
21. Feb 2020, 15:33
Hallo,
ah, Lesefehler.
Ich würde statt dem String einen TStringStream benutzen.
Datei -> TFileStream -> TStringStream -> TStringStream.DataString enthält dann die Datei.
PS1: Du solltest auch Stream.Size mal prüfen, das sollte einen Wert > 0 haben.
PS2: FileStream.Position vor allen Aktionen auf 0 setzen (Vielleicht ist das bei Deinem alten Code schon die Lösung).
Heiko
Geändert von hoika (21. Feb 2020 um 15:45 Uhr)
|