delphi - 在Delphi 7中处理CMYK jpeg文件

我正在尝试访问存储为Jpeg文件的文件，是否有一种简单的方法来显示这些图像文件而不会造成性能损失？

最佳答案

您可以使用TJPEGImage实例加载JPeg文件，然后将其分配给TBitmap进行显示。您可以在jpeg单位中找到TJPEGImage。

jpeg := TJPEGImage.Create;
jpeg.LoadFromFile('filename.jpg');
bitm := TBitmap.Create;
bitm.Assign(jpeg);

Image1.Height := bitm.Height;
Image1.Width := bitm.Width;
Image1.Canvas.Draw(0, 0, bitm);

或者，这也应该起作用：

bitm := TBitmap.Create;
bitm.Assign('filename.jpg');

Image1.Height := bitm.Height;
Image1.Width := bitm.Width;
Image1.Canvas.Draw(0, 0, bitm);

关于delphi - 在Delphi 7中处理CMYK jpeg文件，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/3143543/