bo_sofien
Messages postés8Date d'inscriptionvendredi 25 février 2005StatutMembreDernière intervention16 mars 2005
-
14 mars 2005 à 11:47
ni69
Messages postés1418Date d'inscriptionsamedi 12 juin 2004StatutMembreDernière intervention 5 juillet 2010
-
16 mars 2005 à 20:24
salu a tous jé une question assez facile: comment losque je pointe sur un bouton avec la souris je déclenche l'évènement suivant :une image apparait et quand je le quitte elle disparait. please respond... c'est urgent.
ni69
Messages postés1418Date d'inscriptionsamedi 12 juin 2004StatutMembreDernière intervention 5 juillet 201012 14 mars 2005 à 15:32
Utilise un timer, et dans la procedure OnTimer, mets ceci :
procedure TForm1.Timer1Timer(Sender: TObject);
begin Image1.Visible := ptinrect(Button1.BoundsRect, ScreenToClient(Mouse.CursorPos));
end;
Remarque : abaisse l'intervalle du timer pour que l'application soit plus réactive
@+
Bonne Prog'
Nico
<HR>
N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient !
ni69
Messages postés1418Date d'inscriptionsamedi 12 juin 2004StatutMembreDernière intervention 5 juillet 201012 14 mars 2005 à 15:37
Attention PseudoOM !
OnEnter et OnExit ne fonctionnent pas dans ce cas car ils sont appelés lors de changements de focus, pas de changement de position de la souris !
@+
Bonne Prog'
Nico
<HR>
N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient !
ni69
Messages postés1418Date d'inscriptionsamedi 12 juin 2004StatutMembreDernière intervention 5 juillet 201012 16 mars 2005 à 20:24
as-tu vraiment regardé ce que j'ai posté ?????????????????????????
je le remets au cas où, mais tu n'avais qu'à lire tout ce que l'on te proposait pour trouver ce code (qui marche) :
Utilise un timer, et dans la procedure OnTimer, mets ceci :
procedure TForm1.Timer1Timer(Sender: TObject);
begin Image1.Visible := ptinrect(Button1.BoundsRect, ScreenToClient(Mouse.CursorPos));
end;
Remarque : abaisse l'intervalle du timer pour que l'application soit plus réactive
@+
Bonne Prog'
Nico
<HR>
N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient !