Re: Saving JPEG images to images field in SQL2000 with ADODataSet

How abaout SaveToStream(FStream)

Cheers

Martin Cremer



"Wira" <wira@xxxxxxxxxxxxxxxx> schrieb im Newsbeitrag
news:4490f687@xxxxxxxxxxxxxxxxxxxxxxxxx
I'm Using D5 and SQL2000 for database.
One of my tables in SQL2000 have an image field type for saving picture ,
the problem is when I want to save JPEG images into my table always appear
error message "Bitmap image is not valid".


procedure SavePicture ;
var FStream : TMemoryStream ;
begin
with tblPicture do begin //tblPicture is ADODataSet Component
try
Insert ;
FStream := TMemoryStream.Create ;
FStream.LoadFromFile('C:\PictureFiles\Image01.JPG') ;

TBlobField(FieldByName('im_pic_thumbnail')).LoadFromStream(FStream)
;
Post ;
finally
FStream.Free
end;
end;
end;



Thanks

Wira




.