Mousehover et Datagridview Le Retour

Version imprimable

ReBonjour,

Un petit rappel du sujet, je souhaite que lorsque la souris passe au dessus d'une colonne de mon DataGridView, celle-ci soit Selected (highlighted - surligné en bleu).

Voici le code obtenu et corrigé qui marche presque:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim pt As New Point
        Dim hti As DataGridView.HitTestInfo
        Try
            pt = Me.DGV_echantillon.PointToClient(MousePosition)
        Catch ex As Exception
            Return
        End Try
        hti = Me.DGV_echantillon.HitTest(pt.X, pt.Y)
 
        If hti.Type = DataGridViewHitTestType.Cell Then
 
            Me.DGV_echantillon.Columns(hti.ColumnIndex).Selected = True
 
        End If

Je dis qu'il marche presque car il sélectionne la colonne mais lorsque la souris reste au dessus du DGV, et que le change de colonne, il ne change rien. L'évènement se déclenche bien et les valeurs (comme hti.ColumnIndex) sont bonne.

Pour que ca fonctionne il faut que la souris "sorte" du DGV et reviens, à ce moment il veut bien.

J'ai bien essayer ça :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
  Dim pt As New Point
        Dim hti As DataGridView.HitTestInfo
        Try
            pt = Me.DGV_echantillon.PointToClient(MousePosition)
        Catch ex As Exception
            Return
        End Try
        hti = Me.DGV_echantillon.HitTest(pt.X, pt.Y)
 
        If hti.Type = DataGridViewHitTestType.Cell Then
            If Not hti.ColumnIndex = test_column Then
                Me.DGV_echantillon.ClearSelection()
 
                If Not test_column = -1 Then
                    Me.DGV_echantillon.Columns(test_column).Selected = False
                End If
                Me.DGV_echantillon.Columns(hti.ColumnIndex).Selected = True
                test_column = hti.ColumnIndex
            End If
        End If

Car je pense que le problème viens du DGV.Columns(index).selected = true.

Mais là je bloque un peu. Si quelqu'un a une idée.

Merci d'avance.

26/07/2010, 17h15
methylene

Es-tu sur que l'argument Mouse_Hover est le mieux adapté ?

J'aurais plus vu un Mouse_move perso.

Autre petite question, tu souhaites, si je comprends bien, que quand ta souris arrive sur une colonne la colonne en quetsion soit sélectionnée, sans click de la souris.

De plus si tu ne bouge plus ta souris, et que ta colonne est sélectionnée, et que tu viens à changer de colonne via ton clavier (les flèches droite ou gauche en l'occurrence), la colonne où la souris est présente se déselectionne, et la colonne ayant le "focus" se sélectionne, c'est bien cela ?
26/07/2010, 20h57
chrismonoye

Citation:

Envoyé par methylene

J'aurais plus vu un MouseMove perso.

moi aussi ou "CellMouseMove".
Mais niveau performance!!!....
Un "CellMouseEnter" est mieux adapté.
Par contre, sous vb 2008, j'ai dû adapter le code pour avoir le résultat voulu.
27/07/2010, 08h37
methylene

Pour ajouter que chez moi avec un simple datagridview, ton code ne fonctionne pas, dans mouse_hover comme dans mouse_move.

Bonjour,

J'ai testé ton code sur un projet que j'ai créé, dis moi si c'est ce que tu recherche.

Dans le Load :

Code:

1
2
        DataGridView1.SelectionMode = DataGridViewSelectionMode.FullColumnSelect
        DataGridView1.MultiSelect = False

Ensuite utilise l'évènement CellMouseMove et mets y ton code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
    Private Sub DataGridView1_CellMouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseMove
 
        Dim pt As New Point
        Dim hti As DataGridView.HitTestInfo
 
        pt = Me.DataGridView1.PointToClient(MousePosition)
        hti = Me.DataGridView1.HitTest(pt.X, pt.Y)
 
        If hti.Type = DataGridViewHitTestType.Cell Then
 
            Me.DataGridView1.Columns(hti.ColumnIndex).Selected = True
 
        End If
 
    End Sub

Voilà si j'ai bien compris ce que tu cherchais, cela fonctionne niquel. Le problème venait juste de l'évènement.

Bonne continuation.

Bonjour,
après initialisation du DGV, dans mon test, pour un DGV neuf, j'ai dû ajouter les lignes for ..... next suivantes :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
        For indexCol As Integer = 0 To DGV_echantillon.Columns.Count - 1
            DGV_echantillon.Columns(indexCol).SortMode = DataGridViewColumnSortMode.NotSortable
            'DGV_echantillon.Columns(indexCol).HeaderCell.SortGlyphDirection = SortOrder.None
        Next
        '*** "Impossible de définir le SelectionMode du contrôle DataGridView à ColumnHeaderSelect 
        '     tant qu'il dispose d'une colonne avec SortMode définie à DataGridViewColumnSortMode.Automatic."
        '     D'où la propriété ci dessus pour modifier le mode de tri des colonnes.
        DGV_echantillon.SelectionMode = DataGridViewSelectionMode.ColumnHeaderSelect
        ''*** A tester le code qui suit. Il y a quelques différences au plan de sélection d'une cellule unique,
        ''    et au plan du déplacement avec les flèches. Voir ce qui convient le mieux.
        'DGV_echantillon.SelectionMode = DataGridViewSelectionMode.FullColumnSelect
        'DGV_echantillon.MultiSelect = False

Puis utiliser "CellMouseEnter" :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
    Private Sub DGV_echantillon_CellMouseEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DGV_echantillon.CellMouseEnter
 
        DGV_echantillon.ClearSelection()
 
        Dim pt As New Point
 
        Dim hti As DataGridView.HitTestInfo
        Try
            pt = Me.DGV_echantillon.PointToClient(MousePosition)
        Catch ex As Exception
            Return
        End Try
        hti = Me.DGV_echantillon.HitTest(pt.X, pt.Y)
 
        If hti.Type = DataGridViewHitTestType.Cell Then
            Me.DGV_echantillon.Columns(hti.ColumnIndex).Selected = True
        End If
 
    End Sub

chez moi la différence d'utilisation proceseur entre "CellMouseMove" et "CellMouseEnter" passe de 20 à 2%

28/07/2010, 09h22
mactwist69

Oulla ! Tant de réponse, désolé, j'étais en déplacement hier....

Je vais tester avec ces deux évènements, et oui en effet, je crois que vous avez bien compris ce que je souhaite.

Je vous tiens au courant.

Citation:
Envoyé par methylene
Bonjour,

J'ai testé ton code sur un projet que j'ai créé, dis moi si c'est ce que tu recherche.

Dans le Load :
Code:

1 2 DataGridView1.SelectionMode = DataGridViewSelectionMode.FullColumnSelect DataGridView1.MultiSelect = False
Ensuite utilise l'évènement CellMouseMove et mets y ton code :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 Private Sub DataGridView1_CellMouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseMove Dim pt As New Point Dim hti As DataGridView.HitTestInfo pt = Me.DataGridView1.PointToClient(MousePosition) hti = Me.DataGridView1.HitTest(pt.X, pt.Y) If hti.Type = DataGridViewHitTestType.Cell Then Me.DataGridView1.Columns(hti.ColumnIndex).Selected = True End If End Sub
Voilà si j'ai bien compris ce que tu cherchais, cela fonctionne niquel. Le problème venait juste de l'évènement.

Bonne continuation.
Et bien c'est exactement ça !

Le problème avec l'évènement Mouse_Enter est le même qu'avec l'évènement Mouse_hover....

Si j'amène la souris sur le DGV, il sélectionne bien une colonne, mais si après, je déplace la souris entre les colonnes rien ne se passe. Il faut ressortir la souris du DGV et revenir.

Alors que avec Mouse_Move, c'est interactif !

Merci à tous les deux pour vos contributions en tout cas !

28/07/2010, 17h30
chrismonoye

Bonsoir,

Citation:

Envoyé par mactwist69

Le problème avec l'évènement Mouse_Enter est le même qu'avec l'évènement

si cette remarque me concernait, je parlais du "CellMouseEnter", qui ne "travaille qu'à l'entrée de chaque cellule du DGV, c'est beaucoup plus fluide car moins gourmand.