Position du curseur

J'utilise la procedure getcursorpos(point:tpoint) pour obtenir la position de la souris dans un evenement de timer.La position que l'on me donne est celle par rapport au zero de l'ecran.Existe t-il une procedure permettant d'avoir la position de la souris par rapport au zero d'un panel ou d'une form.J'ai aussi essayé d'utiliser movewindowsorg(...) pour changer l'origine mais n'ai pas réussi à faire fonctionner la routine.
J'ai aussi essayé pour avoir l'origine du panel d'ajouter successivement au 0 de l'écran, form.left + panel.left mais y'a un probleme avec la barre de titre de la form car je n'arrive pas à avoir sa taille.(si quelqu'un voit?).

En espérant que quelqu'un a la solution.Merci d'avance.

gimlithedwarf actuellement en vente en DVD et Cassette!

Tu peux utiliser les fonctions suivantes:
ClientToScreen(TPoint):TPoint;
ScreenToClient(TPoint):TPoint;

Merci de ta réponse je vais regarder l'aide et vais essayer de comprendre!
:D