如何获得 TImage 图片的顶部位置？答案

【问题标题】：How to get top position of TImage picture?如何获得 TImage 图片的顶部位置？
【发布时间】：2015-08-29 20:06:11
【问题描述】：

我在 TPanel 中有一个带有 Align := alClient、Stretch := True、Proportional := True 和 Center := True 的 TImage。如何获取在图像中绘制的图片的顶部像素位置？

也许描述问题的图片会有所帮助：

我看到了这个question，但无法得到与我密切相关的答案。

【问题讨论】：

【解决方案1】：

如果图像的纵横比大于面板的纵横比，则仅在顶部和底部留有空间。假设是这种情况，所需的距离是

round(Panel.Height - (Panel.Width / Image.Picture.Width) * Image.Picture.Height) / 2);

【讨论】：