CONNAITRE LES POSITIONS DE LA SOURIS SUR L'ÉCRAN

slachz Messages postés 109 Date d'inscription lundi 21 avril 2003 Statut Membre Dernière intervention 1 janvier 2006 - 14 mars 2004 à 13:49
cs_benumiit82 Messages postés 32 Date d'inscription mardi 23 mars 2004 Statut Membre Dernière intervention 11 avril 2006 - 19 avril 2005 à 23:34
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/11686-connaitre-les-positions-de-la-souris-sur-l-ecran

cs_benumiit82 Messages postés 32 Date d'inscription mardi 23 mars 2004 Statut Membre Dernière intervention 11 avril 2006
19 avril 2005 à 23:34
Pour Slachz :

procedure TForm11.FormClick(Sender: TObject);
var SourisPos: TPoint;
begin

GetCursorPos(SourisPos);
//Position X
showmessage(inttostr(SourisPos.X));
//Position Y
showmessage(inttostr(SourisPos.Y));
end;
slachz Messages postés 109 Date d'inscription lundi 21 avril 2003 Statut Membre Dernière intervention 1 janvier 2006
14 mars 2004 à 13:49
excuse mais euh... comment on l'utilise ?
je vois pas trop où on le met ds la source et où on obtient les valeurs .
merci.
Rejoignez-nous