Ich benutze zwar kein Interbase, sondern ADS, aber der
SQL-Befehl müsste ja gleich sein:
Dies ist mein Code, um Bilder in die Datenbank zu laden (Datensatz wurde bereits vorher erstellt)
Delphi-Quellcode:
blob:= TMemoryStream.Create;
Image1.SaveToStreamJPEG(blob);
// Bei mir wird ein JPG in einen BLOB geschrieben
try
Close;
SQL.Text := '
UPDATE tblPictures SET JPGThumb = :Thumb WHERE PictureID= :PictureID';
ParamByName('
Thumb').LoadFromStream(blob, ftGraphic);
ParamByName('
PictureID').AsInteger := PictureID;
finally
FreeAndNil(blob);
end;
Query.ExecSQL;
Mein Feld für Bilder ("Thumb") habe ich einfach als Blob definiert, ohne Größenangabe oder sonstiges.
Aber zur Erstellung der Tabellen benutze ich keinen
SQL-Befehl, sondern die Add-Methode der Tabelle.
-> Add('JPGThumb', ftBlob);
Gruß
Jürgen