delphi - 如何在 Delphi 2009 中获取图像的当前 View 大小

Question

我希望获取使用 TImage 显示的图像的当前大小，该对象的 Proportional 属性设置为 True，并与主窗体的客户端对齐。因此，在调整表单大小时，我想获取该图像的当前大小，而不是 Canvas 大小，也不是该图像的实际大小。获取当前大小我可以显示当前图像大小相对于实际图像大小的百分比。提前致谢

Answer 1

我认为没有内置的方法可以做到这一点。您可能只需要计算一下即可。像这样的事情:

1. 获取 Canvas 的高度和宽度。
2. 获取图像的 Picture 属性的高度和宽度。
3. 计算图片尺寸与 Canvas 尺寸的比率。
4. 这两个比率中较小的一个就是您的百分比。