Search code examples
delphifiremonkeymousedownmouse-positionchildcontrol

How to get the control under the mouse cursor in onMouseDown event?

I have a TGridLayout filled with some images in a Firemonkey HD Application. In the gridLayout's onMouseDown event I want to get the image object on which the user has clicked, but I have only mouse coordinates.

Implementing onMouseDown event for every image is not an option, because if an image is removed from the gridlayout an empty space remains. In this case I also want to know if the user has clicked in this empty area.

Is there a some kind of "getChildAtPos" or "FindVCLWindow" analog in Firemonkey?

Thanks!

Solution

  • TForm.ObjectAtPoint should do the trick.