Hi,
ich denke, das Quotedstring ist nicht korrekt.
Um Blob zu speichern,
wandle ich z.Z. den Stream in einen entsprechenden String um.
function StreamToBlobStr(const stream: TStream): ansistring;
var
i: integer;
begin
Result:='0x';//steht für hex-string
for i:=0 to stream.Size-1 do
Result:=Result+IntToHex(stream.ReadByte,2);
end;
Wenn ich jetzt den std. Insert Befehl von
Mysql an.
Gruß
