Also, hab ein Problem beim Speichern von Bildern in einem Blob-Feld.<br>
Der INSERT selbst funktioniert, nur nach einem UPDATE steht in betroffenem Feld gar nichts mehr.<br>
Muss ich irgendwas beachten? Bin noch Anfänger, und so kurz vor dem Wochenende hab ich einfach keinen Durchblick mehr :-)<br>
Hier ein Stück Code:<br>
<br>
<pre>
var pic: TStream;
pic := TFileStream.Create(s_Pic,fmOpenRead);
with Query do
begin
Params.Clear;
Params.CreateParam(ftBlob,'Bild',ptUnknown);
ParamByName('Bild').LoadFromStream(pic,ftblob);
SQL.Clear;
SQL.Add('UPDATE Tabelle SET Blobfeld = :Bild WHERE pk = 1');
ExecSQL;
Transaction.Commit;
end;
</pre>
<br>
Wäre dankbar für Antworten.<br>
Gruß Andy<br>
Der INSERT selbst funktioniert, nur nach einem UPDATE steht in betroffenem Feld gar nichts mehr.<br>
Muss ich irgendwas beachten? Bin noch Anfänger, und so kurz vor dem Wochenende hab ich einfach keinen Durchblick mehr :-)<br>
Hier ein Stück Code:<br>
<br>
<pre>
var pic: TStream;
pic := TFileStream.Create(s_Pic,fmOpenRead);
with Query do
begin
Params.Clear;
Params.CreateParam(ftBlob,'Bild',ptUnknown);
ParamByName('Bild').LoadFromStream(pic,ftblob);
SQL.Clear;
SQL.Add('UPDATE Tabelle SET Blobfeld = :Bild WHERE pk = 1');
ExecSQL;
Transaction.Commit;
end;
</pre>
<br>
Wäre dankbar für Antworten.<br>
Gruß Andy<br>
Comment