如何在Delphi XE2试用版中缩放TImage控件中加载的图像?

如何在Delphi XE2试用版中缩放TImage控件中加载的图像?,delphi,zooming,delphi-xe2,timage,Delphi,Zooming,Delphi Xe2,Timage,我开发了一个小实用程序,可以在DelphiXe2的TImage控件中加载不同类型的图像文件。现在我想实现和测试缩放功能,只使用内置控件(即不使用任何第三方组件)。请参见第二部分,其中使用鼠标滚轮放大和缩小图像 注意:它会重新定位图像组件

我开发了一个小实用程序,可以在DelphiXe2的
TImage
控件中加载不同类型的图像文件。现在我想实现和测试缩放功能,只使用内置控件(即不使用任何第三方组件)。

请参见第二部分,其中使用鼠标滚轮放大和缩小图像

注意:它会重新定位图像组件