TListView la souris au-dessus de Quel item ?
Bonjour
Sur ma TForm, j'ai 1 TListView et 1 TStatusBar
Je voudrais que le texte de ma barre d'état se modifie en fonction de l'élément survolé par le curseur, donc avant tout clic
Mais le code suivant reste inopérant
Code:
1
2
3
4
5
6
7
| procedure TForm1.ListView1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if ListView1.ItemFocused=nil
then StatusBar1.Panels[0].Text:=[texte si aucun élément n'est survolé]
else StatusBar1.Panels[0].Text:=[texte en fonction de ListView1.itemfocused];
end; |
J'ai tout essauyé: itemindex, itemfocused, selected
Peau d'balle... :cry:
Est-ki faudrait pas regarder du côté des messages windows 8O
Qqn a une piste ?
