I need a way to save the JPEG image to the database and then recover it.

I have tried to create a Blobstream to copy the image from the JPeg image to
the Picture field in the table, but I am unable to create the Blobstream
with this line:

        Stream2 :=
tblPicture.CreateBlobStream(tblPicture.FieldByName('Picture'), bmWrite);

but I get a compiler error:  Incompatible types: 'TBlobStream' and
'TStream'.

I tried to typecast the binary field, 'Picture' to type TBlobStream but that
did not work either.

Does anyone know how to save a Jpeg image to a database field?

//create a field(xxfield) in your Paradox table(xxtable) with field type
GRAPHIC

//save you JPEG file into table
xxtablexxfield.LoadFromFile('YourJpegFile.Jpg');

//Load from xxfield and save it into 'YourJpegFile.Jpg'
Var FileStream: TFileStream;
      BlobStream: TBlobStream;
Begin
    BlobStream := TBlobStream.Create(xxtablexxfield,bmRead);
    if BlobStream.Size=0 then begin BlobStream.Free; Exit; end
    else Begin
     FileStream := TFileStream.Create('YourJpegFile.Jpg',fmCreate or
fmOpenWrite);
     FileStream.CopyFrom(BlobStream, BlobStream.Size);
     FileStream.Free;
     BlobStream.Free;
    end;
end;

-------------------------------------
Frankie Leong

Phil Edwards <p...@cicom.net> wrote in article
<6tuh0k$kv...@scoop.suba.com>...

Or, alternatively, use TBlobStream.Create(Field: TBlobField; Mode:
TBlobStreamMode).