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反过来就行了。
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反过来就行了。