Discussion :

[snop9001]

bonjour à tous

Je cherche à réaliser la chose suivante:

Je veux afficher un message sous le curseur de la souris lorsque je survole un boutton, je cherche avec la procédure buttonmousemove mais je n'y arrive pas.
si quelqu'un peut me fournir un code avec quelques explications, je lui en serais gré...
merci d'avance

[Duan]

Dans les propriétés du bouton, tu as la propriété Hint. Inscrit le message que tu désires.
Tu mets la propriété ShowHint à True dans cette même liste.

Tu peux aussi faire la même chose directement dans ton code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TForm1.FormCreate(Sender: TObject);
  begin
    Button1.Hint:='Bonjour';
    Button1.ShowHint:=True;
  end;

Ceci te permet de changer le texte à volonté ou de le cacher si tu le désire (ShowHint à False).

Salutation
Duan

[evarisnea]

penser aussi à mettre la propriété ShowHint de la form à True

[snop9001]

merci à toi duan qui veille si tard pour m'amener une réponse aussi rapide et efficace...merci à toi evarisnea de ton rappel...
problème résolu 5/5..