FireMonkeyのマウス座標 (ID:151092)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Delphi11.3Entを使用してFireMonkeyアプリを作成しています。 開閉するサイドメニューを作成したいので、TRectAngleを左に配置し、その上にTSpeedButtonを配置し、両オブジェクトのOnMouseLeaveイベントでサイドメニューの幅を調整しようとしています。 しかし、これですと、次のメニューボタンへマウスカーソルを移動した時もこのイベントが走るため、サイドメニューが畳まれてしまいます。 これを抑制するために、マウスの座標を捉えたいのですが、TScaledLayoutを採用しているためやフォームのサイズを自由に調整できるためか、マウス座標の値が少し違う気がします。 アプリケーション上のマウス座標を取得する良い方法がありましたら、教えて頂けませんか？