启用TImage以在Delphi XE3中打开JPEG，GIF和PNG？

Question

我希望重用一些在dll中的设备上下文中绘制图像的代码。它使用TImage在原始程序中正常工作。但是在dll中BMP和TIFF加载很好，但是加载JPG的PNG和GIF时出错，原来加载的很好。我正在寻找原始代码中的任何内容以启用它们。我在Vcl.Graphics中看到它看起来是否定义了CLR，我尝试添加到项目的条件定义但是没有用。我似乎无法在项目设置中找到任何其他选项，我缺少启用CLR。

Answer 1

在您的jpeg条款中加入pngimage，gifimg和uses。这些单元可以使用相应的图像类型并注册其文件扩展名。