这是个"过期"技术问题,我仅作为存档贴出来。以备日后参考。
Delphi中读取JPEG图片可使用TJPEGImage对象,样例代码如下:
var
jpeg :TJpegImage ;
jpeg := TJPEGImage.Create;
try
jpeg.LoadFromFile(FileName);
Image1.Canvas.Draw(0,0,jpeg);
finally
jpeg.Free;
end;
这是个"过期"技术问题,我仅作为存档贴出来。以备日后参考。
Delphi中读取JPEG图片可使用TJPEGImage对象,样例代码如下:
var
jpeg :TJpegImage ;
jpeg := TJPEGImage.Create;
try
jpeg.LoadFromFile(FileName);
Image1.Canvas.Draw(0,0,jpeg);
finally
jpeg.Free;
end;
转载于:https://www.cnblogs.com/yankchina/archive/2006/11/30/577215.html