Delphi中如何实现指定宽高比的DrawFocusRect绘制？

本文共计423个文字，预计阅读时间需要2分钟。

希望能在图像上绘制一个FocusRect，它能保持图像的纵横比。我的问题是，FocusRect仅取决于鼠标的y坐标。我不知道如何让矩形取决于两个鼠标坐标。