Problem with Streamed-JPEG and Blob-Field
Posted: Tue 15 Jul 2008 20:59
Hi,
i try to insert an Jpeg-Image in a Blob-Field. Here is my source:
but I get the message "Data type is not supported". What am I doing wrong?
Best regards ...
i try to insert an Jpeg-Image in a Blob-Field. Here is my source:
Code: Select all
if main.Image3 nil then
begin
img := TJPEGImage.Create;
img.Assign(main.Image3.Picture.Bitmap);
s := TMemoryStream.Create;
img.SaveToStream(s);
s.Position := 0;
ContactsQuery.ParamByName('P33').LoadFromStream(s, TBlobType(0));
FreeAndNil(img);
end;
ContactsQuery.ExecSQL;
Best regards ...