Discussion :

[Anduriel]

Bonjour à tous,

J'aimerai pouvoir fixer la taille des colonnes d'un listview, et que l'utilisateur ne puisse pas la modifier.
Comme je n'ai rien trouvé dans les propriétés, j'ai fait:

Code :

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

1
2
3
4
5
Private Sub ListView1_ColumnWidthChanging(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.ColumnWidthChanging
ListView1.Columns(0).Width = 270
ListView1.Columns(1).Width = 53
ListView1.Columns(2).Width = 212
End Sub

Mais il n'a pas l'air d'aimer ça (boucle infinie, ce qui est compréhensible si je laisse le bouton de la souris enfoncé et que je Drag).

Y a t-il une solution?
Merci

[adn56]

Tiens cadeaux, c'est de la bricole mais cela marche bien chez moi

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
    Private Sub listView1_ColumnWidthChanging(ByVal sender As Object, _
    ByVal e As ColumnWidthChangingEventArgs) _
    Handles ListView1.ColumnWidthChanging
 
        ' détecte si une colonne est modifié en largueur
        If e.NewWidth > CDbl(e.ColumnIndex.ToString) OrElse e.NewWidth < CDbl(e.ColumnIndex.ToString) Then
 
            'replace les colonnes comme elles étaient (plus de redimensionnement quoi)
            Select Case e.ColumnIndex
                Case 0
                    e.NewWidth = 270
                Case 1
                    e.NewWidth = 53
                Case 2
                    e.NewWidth = 212
            End Select
 
            e.Cancel = True
        End If
 
    End Sub

[Anduriel]

Ah génial, merci !

Petite question: à quoi sert le e.Cancel à la fin?

Merci

[adn56]

normalement plus à rien ^^
il servait avant à annuler la procédure, mais là tu dois pouvoir le virer.
++