Re: convert JPG to BMP

uses Jpeg;

----- Original Message -----
From: thby <[email protected]>
To: <[email protected]>
Sent: Saturday, August 02, 2003 12:01 PM
Subject: Re: [Delphi] convert JPG to BMP


> procedure TForm1.Bmp2Jpeg(Bmp1:TBitmap);
> var   Jpg1: TJPEGImage;
> begin
>   Jpg1 := TJPEGImage.Create;
>   try
>     Jpg1.Assign(Bmp1);
>     Jpg1.SaveToFile('C:\$temp$.jpg');
>   finally
>     Jpg1.Free;
>   end;
> end;
>
> procedure TForm1.Jpeg2Bmp(Jpg1:TJPEGImage);
> var
>   Bmp1: TBitmap;
> begin
>   Bmp1 := TBitmap.Create;
>   try
>     Bmp1.Assign(Jpg1);
>     Bmp1.SaveToFile('C:\$temp$.bmp');
>   finally
>     Bmp1.Free;
>   end;
> end;
>
> ----- Original Message -----
> From: Martin <[email protected]>
> To: <[email protected]>
> Sent: Saturday, August 02, 2003 3:14 AM
> Subject: [Delphi] convert JPG to BMP
>
>
> Hello somebody colud send me the algoritm(or the code :D) to convert an
> image JPG to BMP. Thanks.
>
> "Aprende como si fueras a vivir siempre...
> pero vive como si fueras a morir mañana."
> Saluda atte Martin
> mailto: [email protected]
> site: www.falconi.org.ar
>
>
> [Non-text portions of this message have been removed]
>
>
>
> CodeCoffer - new Delphi code protection Tool!
> http://www.delphicollection.com/public/CodeCoffer.htm
> ---------------------------------------------------------------
> Unsubscribe:[email protected]
> List owner:[email protected]
> ---------------------------------------------------------------
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>
>
>
>
>
> CodeCoffer - new Delphi code protection Tool!
> http://www.delphicollection.com/public/CodeCoffer.htm
> ---------------------------------------------------------------
> Unsubscribe:[email protected]
> List owner:[email protected]
> ---------------------------------------------------------------
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>
>


------------------------ Yahoo! Groups Sponsor ---------------------~-->
Free shipping on all inkjet cartridge & refill kit orders to US & Canada. Low prices up to 80% off. We have your brand: HP, Epson, Lexmark & more.
http://www.c1tracking.com/l.asp?cid=5510
http://us.click.yahoo.com/GHXcIA/n.WGAA/ySSFAA/i7folB/TM
---------------------------------------------------------------------~->

CodeCoffer - new Delphi code protection Tool!
http://www.delphicollection.com/public/CodeCoffer.htm
---------------------------------------------------------------
Unsubscribe:[email protected]
List owner:[email protected]
--------------------------------------------------------------- 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/