Pozycja przycisku i innych

jak odczytaj pozycje przycisku lub innego komponentu względęm okna programu jak i względem pulpitu.
jak odczytaj pozycje kursora myszki względęm okna programu jak i względem pulpitu.

Dzięki. Pozdrawiam

Wględem okna :

x := TButton.Left;
y := TButton.Top;

Względem pulpitu :

x := TForm.Left + TButton.Left;
y := TForm.Top + TButton.Top;

Mysz względem pulpitu :
http://4programmers.net/view_faq.html?id=69
Mysz względem formy :
ClientToScreen + F1

Przycisk względem formy:

Button.Top
Button.Left

Przycisk względem ekranu:

ClientToScreen(Point(Button.Left,0)).X
ClientToScreen(Point(0,Button.Top)).Y

Do myszki masz funkcje: GetCursorPos(var TPoint). Poczytaj o niej i o funkcjach: ClientToScreen i ScreenToClient.