[VBA] événements souris sur un item d'une listview

Bonjour,

Je voudrais savoir s'il est possible de récupérer les événements :
- MouseEnter
- MouseExit
- DblClick
sur un item d'une listview ?

Merci

Bonjour,
Pour DblClick, le seul événement approchant semble être "ItemClick"
Extrait de l'aide:

Citation:

---

Occurs when a ListItem object in a ListView control is clicked.

Syntax
Private Sub object_ItemClick(ByVal Item As ListItem)

The ItemClick event syntax has these parts:

Part ....................Description
object ............Anobject expression that evaluates to a ListView control.
listitem ...........The ListItem object that was clicked.

Remarks
Use this event to determine which ListItem was clicked. This event is triggered before the Click event. The standard Click event is generated if the mouse is clicked on any part of the ListView control. The ItemClick event is generated only when the mouse is clicked on the text or image of a ListItem object.

---

Sinon en fonction de ce que tu veux effectuer avec "MouseEnter" et "MouseExit", il existe également une propriété "HoverSelection" qui pourrais-peut-être te convenir...
Extrait de l'aide....

Citation:

---

HoverSelection Property

Returns or sets a value that determines if a ListItem object is selected when the mouse pointer hovers over it.

Syntax
object.HoverSelection [= boolean]

The HoverSelection property syntax has these parts:

Part ..............................Description
object ............Anobject expression that evaluates to an object in the Applies To list.
boolean ..........ABoolean expression specifying if the object is selected, as shown in Settings.

Settings
The settings for boolean are:

Constant .....................Description
False ..............(Default). No selection occurs.
True ..............The item is selected after the mouse pointer hovers over it for a few seconds.

---

Ben en fait les événements MouseEnter et MouseExit, je vaux m'en servir pour changer le curseur de la souris lorsque l'utilisateur survole un item de la listview, pour lui montrer qu'il peut cliquer dessus.

Ces événements sont sur la listview entière, il n'y a pas moyen de les récupérer sur les items ?

Bonjour,

Citation:

---

m'en servir pour changer le curseur de la souris lorsque l'utilisateur survole un item de la listview, pour lui montrer qu'il peut cliquer dessus.

---

Après quelques tests avec une ListView, voici les paramètres que tu pourrais adopter pour réaliser ce que tu veux.

Onglet Général:
MousePointer = 0 - ccDefault
View = 2 - lvwList
Arrange = 0 - lvwNone
LabelEdit = 1 - lvwManual
..... le reste sans changement

Tu coche les options suivantes:
HideSelection / Enabled / Hot Tracking

Résultat:
Au survol d'un Item, celui-ci est surligné et le curseur change en "Main".

En espérant que cela réponde à ton problème....;)

Oui, c'est ce que je recherchais.

Merci

Le problème, c'est que maintenant, lorsque je survole un item avec la souris, l'événement item_click est levé.

Y'a-t-til moyen de résoudre cela ?

Merci

FreeAccess>
j'ai une autre façon de faire pour le survole d'objet et ta méthode m'interesse.
tu peux m'expliquer où je trouve:

Citation:

---

Onglet Général:

---

je pense ne pas avoir la bonne version d'access.

Tu fais un clic droit sur ta listview, et tu va sur l'item "Objet ListViewCtrl", puis "Propriétés"

Merci DJBORIE, je n'avais pas pris le bon objet 'List View'.
merci aussi FreeAccess.

Bonjour,
Et bien c'est tout bon....on arrive doucement vers une solution....;)

Citation:

---

lorsque je survole un item avec la souris, l'événement item_click est levé

---

Heu..la je n'ai pas tout compris....8O
Tu gère bien ceci avec l'événement correspondant de ta ListView :question:

Code:

---

1 2 3

Private Sub ListView1_ItemClick(ByVal Item As Object) ........le code que tu veux..... End Sub

---

Oui c'est bien comme ca que je gère mon événement.
Mais le code de mon événement listview_itemclick est exécuté lorsque mon pointeur survole un item.

Citation:

---

...mon événement listview_itemclick est exécuté lorsque mon pointeur survole un item

---

Ok, bien vue....je viens de tester..et j'ai compris..;)
Effectivement si tu active " HoverSelection" avec un événement "ItemClick", ton événement se déclenche systématiquement au 'survol' de la souris....:(

Pour l'instant, à part désactiver "HoverSelection", je n'ai pas d'autre solution..:?