frozenade
frozenade

Reputation: 179

How to implement Firebird Blob images in Delphi

I've searched around but I can't find anything suitable for me. I found this, but it doesn't fit what I need.

I have a browse button with a .jpg filter, but I don't have a clue how to save the image to a blob field, then display onto a TImage.

Upvotes: 1

Views: 1469

Answers (1)

No'am Newman
No'am Newman

Reputation: 6477

The following code shows how I save a picture into a blob field. qEditClass6Question is the field 'question' of the query qEditClass6. Once the picture is loaded into the blob field, the current tuple can be posted to the database.

Procedure TEditClassSix.LoadPic;
var
 j: TJPEGImage;

begin
 j:= TJPEGImage.Create;
 j.Assign (qEditClass6Question);
 image1.picture.assign (j);
end;

Upvotes: 0

Related Questions