Link to home
Start Free TrialLog in
Avatar of josef_hd
josef_hd

asked on

How to save a pic under pic-format ?

How can i save (or convert) a picture int the
GIF/JPEG - Format ???
ASKER CERTIFIED SOLUTION
Avatar of rwilson032697
rwilson032697

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of ZifNab
ZifNab

hi josef_hd,

oops, looks like somebody already answered it...

well, here is the one proposed with others, JPEG...

lot's of free components already available for this :

e.g.
 http://torry.rimini.com/vcl/graphics/gifimage.zip
 http://torry.rimini.com/vcl/graphics/gifimage.exe
 http://torry.rimini.com/vcl/graphics/jpgimg.zip
 http://torry.rimini.com/vcl/graphics/nviewlib.zip
 http://torry.rimini.com/vcl/graphics/imagervr.zip
 

Regards, Zif.
Here is a simple example to convert  BMP to a JPG file and then save it on a disk...
uses JPEG;
//--------------------
var
  MyJpeg: TJpegImage;
  Image1: TImage;
begin
  Image1:= TImage.Create;
  MyJpeg:= TJpegImage.Create;
  try
    Image1.LoadFromFile('TestImage.BMP');  // Load the Bitmap from a file
    MyJpeg.Assign(Image1.Picture.Bitmap);  // Assign the BitMap to MyJpeg
    MyJpeg.SaveToFile('MyJPEGImage.JPG'); // Save the JPEG to Disk
  finally
    MyJpeg.Free;
    Image1.Free;
  end;
end;

Regards,
Viktor Ivanov