如何获取TImage图片的top位置?

How to get top position of TImage picture?

我在 TPanel 中有一个带有 Align := alClientStretch := TrueProportional := TrueCenter := True 的 TImage。如何获取图像中绘制的图片的顶部像素位置?

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

我看到了这个question,但是找不到与我需要的密切相关的答案。

如果图像的纵横比大于面板的纵横比,则顶部和底部将只剩下space。假设是这种情况,所需的距离是

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