procedure TWPThread.Jpg2Bmp(Src, Dst: String);
var SrcJpg:TJpegImage; DstBitMap:TBitMap;begin SrcJpg:=TJpegImage.Create; SrcJpg.LoadFromFile(Src); DstBitMap:=TBitMap.Create; DstBitMap.Assign(SrcJpg); DstBitMap.SaveToFile(Dst); SrcJpg.Free; DstBitMap.FreeImage; DstBitMap.Free;end;//Src,Dst为文件名//BMP2Jpg反过来就行了。
支付宝扫一扫
微信扫一扫
