How do I store JPG images in a Paradox database for display in a Delphi Imager

I used Delphi 5 to create software that stores bimap images in a Paradox 7 database and displays the images using the DBImager. This works well but storing a lot of bitmap images creates huge database BLOB files. Is it possible to store and display the images as either Jgeg or GIF files that require substantially less space than the bitmaps?
Thank you.
Tom Myers

//Load any file into the BlobField
procedure TForm1.Button1Click(Sender: TObject);
Var
ExtS : String; //Holds The Extension
begin
if (Table1.State = dsEdit) or
(Table1.State = dsInsert) then // Do only if in edit mode
begin
If opendialog1.Execute then // If file selected
begin
if Table1.FieldByName('Picture').IsBlob then // this line can deleted
begin //remember the Extension
ExtS := copy(AnsiUpperCase(ExtractFileExt(OpenDialog1.FileName)),2,MaxLongInt);
try
TBlobField(Table1.FieldByName('Picture')).LoadFromFile(opendialog1.filename); //Store the File in the Blob
Table1.FieldByName('Typ').AsString := ExtS; //Store the Extension in the Grafic-TypField
try
//try to load Image, also from file
image1.Picture.LoadFromFile(opendialog1.filename);
except
//failed to load Image, also from file
showmessage('Cannot display this File as Imageformat'+#10+
'File is loaded anyway');
image1.Picture := Nil;
end;
except
//Any Error
Raise;
end;
end;
end;
end else ShowMessage('Table is not in Edit Mode!');
end;

#1. (TheRealLoki) This will work well with my present Paradox Graphic Fields, I appreciate your efforts;
#2. (kretzschmar) This should work well for future software development. Thank You;
#3. (BdLm) Not what I was looking for but will find it useful in the futrue. Thank you;

Many thanks to those who offered help. This should get me up and running.

TheRealLoki, You made the comment:
(if you would prefer to use the paradox Blob type, please let me know. You can still do it very easily, you just need to use the "CreateBlobStream" method of the field instead)
Any additional information concerning the process would be sincerely apprecaiated.

A lot of questions regard threads in Delphi.
One of the more specific questions is how to show progress of the thread.
Updating a progressbar from inside a thread is a mistake.
A solution to this would be to send a synchronized message to the…

Hello everybody
This Article will show you how to validate number with TEdit control,
What's the TEdit control?
TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text.
Usua…

Illustrator's Shape Builder tool will let you combine shapes visually and interactively. This video shows the Mac version, but the tool works the same way in Windows. To follow along with this video, you can draw your own shapes or download the file…