ComboBox sur un Header DataGridView

Version imprimable

21/06/2019, 10h29
__bv__

ComboBox sur un Header DataGridView

Bonjour
Je cherche à créer un ComboBox sur un Column Header d'un DataGridView (DGV)
Je suis arrivé à changer les cellules du DGV en ComboBox mais pas le Header.
Il me semble que tout est possible dans VS, mais je ne vois pas comment et j'aimerais éviter devoir créer une nouvelle classe héritée de DGV.
Merci par avance
Bruno
28/06/2019, 08h32
__bv__

N'ayant pas vu de commentaire, je ne sais pas si ma question est insoluble ou au contraire trop triviale.
Une autre variante intéressante serait un ListBox ou ListView sur clique-droit du Header d'un DataGridView, bref pouvoir sélectionner quel champ lister en dessous.
28/06/2019, 11h59
Phil Rob

Bonjour Bruno,

Ta question n'est certainement pas triviale !
J'ai cherché (un peu) et je n'ai rien trouvé.

Par contre, je peux faire une colonne de cellules ComboBox dans le DataGridView mais ça, ce n'est pas ta question :(

Bonne journée,
28/06/2019, 12h57
__bv__

Merci Phil
J'ai bien trouvé ceci sur GitHub : https://gist.github.com/sdanna/2597102
Mais ça me dépasse un peu beaucoup... 8O
28/06/2019, 14h21
Phil Rob

Je n'ai pratiquement jamais utilisé de librairie externes à VisualStudio.

Le lien que tu transmets nous conduit au code (en C#) de 2 classes qui devraient être utilisables pour placer des Headers de type ComboNumericHeaderCell et SpecialColumnHeader. Je pense qu'il faudrait compiler ces classes en DLL et les référencer dans ton projet VB, mais cela me paraît difficile sans souscrire davantage à github.

Sûrement qu'il existe des participants à ce forum qui travaillent déjà avec github ... Eux pourraient clarifier l'usage possible de ces classes.
28/06/2019, 14h31
Pol63

le plus simple c'est de t'abonner à clic /clic droit sur l'entete de la colonne et de popup une fenetre
28/06/2019, 15h06
__bv__

Merci Pol ! Excellente idée ! Simple et efficace !
28/06/2019, 18h09
__bv__

1 pièce(s) jointe(s)

Voici un mini-projet qui implémente ce que je voulais obtenir avec l'idée simple et néanmoins géniale de Pol.
En espérant que cela pourra être utile à certains VBistes balbutiant comme moi 8-)
Encore merci.
28/06/2019, 18h30
Phil Rob

C'est simple en effet. Génial.
Merci pour le feedback.

1 pièce(s) jointe(s)

Juste pour m'amuser un peu ...

En ajoutant quelques lignes de codes au chargement de ta popup, tu obtiens un effet plus porche de ce qu'il aurait été avec une ComboBox.

Bonne journée

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
    Private Sub Greeks_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
        With LstGreeks.Items
            .Clear()
            .Add("DELTA")
            .Add("GAMMA")
            .Add("THETA")
            .Add("VEGA")
            .Add("VOMMA")
        End With
 
        Me.FormBorderStyle = FormBorderStyle.None
        Me.Height = (LstGreeks.Items.Count + 1) * LstGreeks.Font.Height  ' ScrollBar directement visible si pas de '+1'
        Me.Width = Form1.DGVtest.Columns(ColumnNumber).Width
        LstGreeks.Dock = DockStyle.Fill
 
    End Sub

Pièce jointe 487378

29/06/2019, 11h11
Pol63

idéalement il faut aussi gérer l'event Deactivated pour faire me.dispose
comme ca quand l'utilisateur clic ailleurs sur la fenetre cette popup se ferme (comme un combobox)
29/06/2019, 12h13
__bv__
Merci
Je pense que l'event Deactivated n'est pas vraiment nécessaire dans mon exemple. Le Form "ComboBox" est statique et reste simplement en mémoire.
En revanche, Phil, j'ai aussi pris un raccourci peu élégant dans son positionnement dans DGVtest_ColumnHeaderMouseClick:
Code:

1 2 3 Dim Y As Integer = Location.Y + 50 ' arbitrary Y offset Dim X As Integer = Location.X + 50 ' arbitrary X offset
On doit pouvoir faire mieux, non ?