[NIch]

Ты все правильно написал, по такому же принципу и получаешь координаты объекта. Что тебя смущает?

Код:

X := Form1.Left + Button1.Left;
Y := Form1.Top + Button1.Top;