Hallo,
habe den Inhalt eines TImage dynamisch über eine Twain-Komponente geladen, bzw. ein vorher definiertes Bild in diese geladen.
Nun möchte ich dessen Inhalt über eine SQLQuery direkt an die Firebird Datenbank senden. Habe zwar schon ein wenig was versucht, dass klappte aber nicht so besonders. Bekomme immer die Fehlermeldung:
Column Unknown: bild1
Das Blob Feld, in dem das TImage geladen wird, hat die folgende Definition:
BLOB SUB_TYPE 0 SEGMENT SIZE 80
Hier ein Quellcodeausschnitt:
Delphi-Quellcode:
procedure SaveBild;
var query:TSQLQuery;
begin
inherited;
//Bild in DB Speichern...
try
query := TSQLQuery.Create(self);
query.SQLConnection := SQLConnection1;
query.Close;
query.SQL.Clear;
query.SQL.Add('
update bilder set BILD = :bild1 where id = 1;');
query.ParamByName('
bild1').Assign(Image1.Picture);
query.ExecSQL(true);
except
on e:
Exception do ShowMessage(e.
Message);
end;
end;
Danke für eure Hilfe...