Les images et les curseurs [Résolu]

Signaler
Messages postés
233
Date d'inscription
jeudi 30 septembre 2004
Statut
Membre
Dernière intervention
26 juin 2011
-
Messages postés
233
Date d'inscription
jeudi 30 septembre 2004
Statut
Membre
Dernière intervention
26 juin 2011
-
voila:
je suohaiterai pouvoir faire suivre le curseur par une image (pourriez-vous m'indiquez si il faut 1 certains composant)

merci.

---------------------
Jack NUMBER
---------------------

2 réponses

Messages postés
1418
Date d'inscription
samedi 12 juin 2004
Statut
Membre
Dernière intervention
5 juillet 2010
13
Essaie comme ça (bien sûr, il faut que ton appli soit en plein écran, sinon l'image se bloque sur un bord de ta form....) :
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
Image1.Top := Y + 10;
Image1.Left := X + 10;
end;


@+
Bonne Prog'
Nico

N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient ! ;)
Messages postés
233
Date d'inscription
jeudi 30 septembre 2004
Statut
Membre
Dernière intervention
26 juin 2011
2
merci. :)
c'est exactement la réponse que j'aurai voulu avoir ;)

---------------------
Jack NUMBER
---------------------