Programowanie w języku Delphi » FAQ

Jak skonwertować obrazek z *.bmp na *.jpg

Począwszy od Delphi 3 znajduje się moduł jpeg. To właśnie dzięki niemu można dokonać konwersji. Wystarczy dokonać takiej operacji:

var
  Bitmap : TBitmap;
  JPG : TJPEGImage;
begin
  try
    Bitmap := TBitmap.Create;
    Bitmap.LoadFromFile('C:\plik.bmp');
    JPG := TJPEGImage.Create;
    JPG.Assign(Bitmap);
    JPG.SaveToFile('C:\plik.jpg');
  finally 
    Bitmap.Free;
    JPG.Free;
  end;
end;


Zobacz także:

6 komentarzy

PoP_Gniezno 2007-07-03 18:48

bordeux: tamten komentarz ma już prawie rok :-P
Pewnie chodziło mu o zasadę działania :-D

bordeux 2007-07-03 17:05

Za pomocą tego???? hahaha tylko na bitmapki dziala

physikus 2006-07-22 16:02

Mam pytanko. Mozna zapomocą tego przkonwertować plik z wav na mp3? czy nie?

Snowak 2004-04-13 19:39

No wlasnie, tez chcialem na to zwrocic uwage

belas 2004-02-22 12:45

dzieki za pomoc, ale...

"JPG.Assign(B);"  ---> JPG.Assign(Bitmap);
B.Free;"              ---> Bitmap.Free;