Convert JPG to BMP
With this procedure below you can convert JPT to BMP.
Procedure ConvertJPGtoBMP;
var
jpeg: TJPEGImage;
bmp: TBitmap;
Begin
jpeg:= TJPEGImage.Create;
try
jpeg.LoadFromFile( filename );
bmp:= TBitmap.Create;
try
bmp.Assign( jpeg );
bmp.SaveTofile( ChangeFileExt( filename, ‘.BMP’ ));
finally
bmp.free
end;
finally
jpeg.free
end;
end;
...
...
...
1 comment Thursday 15 Feb 2007 | Delphi Tutorial | Graphics
I am new to using graphics fields especially in my database programs and had struggled to understand how to load a Jpeg image into a DBGraphic field.
Thanks to your tutorial ref: Convert JPG to BMP I finally understand how to do it.
Thanks for an excellent and very informative site
Bazz