position absolue d'un composant

bonjour,

je voudrais savoir si il existe une méthode pour connaitre la position abolue d'un composant par rapport à une Form.
En effet je peux connaitre la position relative de ce composant par rapport à son Panel le contenant. Je sais que je pourrai chercher du coté d'une fonction récursive qui me donne la position des parents jusque arriver à ma Form mais si il existe déjà une fonction le faisant je ne vais pas réinventer la roue :wink:

Merci d'avance

je me suis résolu à écrire la fonction donc si ça intéresse quelqu'un :

Code:

---

1 2 3 4 5 6 7

int __fastcall MyTools::PosAbsLeft(TWinControl *WC) { if((AnsiString)WC->ClassName() == "TForm") return 0; else return (PosAbsLeft(WC->Parent) + WC->Left); }

---

voili voilou

Tu peux aussi utiliser les méthodes:

TControl::ScreenToClient
TControl::ClientToScreen

Ces méthodes utilisées ensemble permettent de passer du système de coordonnées d'un control à l'autre.

a+