delphi中Bmp转Jpeg JPG转BMP – CSDN博客

;----Bmp转Jpeg----- uses Jpeg;procedure TForm1.Button1Click(Sender: TObject);VarJpg : TJpegImage;BMP : TBitMap ;beginJpg :=TJpegImage.Create;BMP :=TBitmap.Create;BMP.LoadFromFile(H:/Avi_图_Wav/跳.bm 来源：