Obtenir la position de la souris ?

Marsh Posté le 25-11-2002 à 16:03:22

Hello,

Comment obtenir la position de la souris en delphi sur l'ecran ?

J'ai essayé ca :

Code :

var SourisPos: TPoint;
begin
...
GetCursorPos(SourisPos);
//Position X = SourisPos.X
//Position Y = SourisPos.Y
...
end;

Le probleme c'est qu'a la compilation Delphi 6 me dit "[Erreur] Main.pas(63): Instruction attendue, mais expression de type 'LongBool' trouvée" a la ligne de "GetCursorPos" [:sisicaivrai]

EDIT : Je précise le problème :
J'aimerais afficher un menu "pop up" quand l'utilisateur cliques sur une TImage a l'endroit où est sa souris lors de l'evenement "OnClick" [:xfalken]