Discussion :

[mikolirto]

bonjours j aimerais faire un mappage des noms de colonne dans mon datagrid mais cela ne fonctionne pas qq un pourrait il m aider svp merci par avance

Dim grdColStyle1 As New DataGridTextBoxColumn
With grdColStyle1
.HeaderText = "fournisseur"
.MappingName = "nom_four"
.Width = 50
End With

[ld9474]

Avant de mapper les colonnes, il faut mapper la table avec un TableStyle auquel tu ajoutes tes ColumnStyles...

[mikolirto]

oki vla le code que j ai

Private Sub FormatGridWithBothTableAndColumnStyles()
' format de table avec les style de la table et des colonnes
With DtGridFour
.BackColor = Color.GhostWhite
.BackgroundColor = Color.Lavender
.BorderStyle = BorderStyle.None
.CaptionBackColor = Color.Red
.GridLineColor = Color.Red
.CaptionFont = New Font("Tahoma", 10.0!, FontStyle.Bold)
.CaptionForeColor = Color.Bisque
.Font = New Font("Tahoma", 8.0!)
.ParentRowsBackColor = Color.Lavender
.ParentRowsForeColor = Color.MidnightBlue

End With


Dim grdTableStyle1 As New DataGridTableStyle
With grdTableStyle1
.AlternatingBackColor = Color.GhostWhite
.BackColor = Color.GhostWhite
.ForeColor = Color.MidnightBlue
.GridLineColor = Color.RoyalBlue
.HeaderBackColor = Color.MidnightBlue
.HeaderFont = New Font("Tahoma", 8.0!, FontStyle.Bold)
.HeaderForeColor = Color.Lavender
.SelectionBackColor = Color.Teal
.SelectionForeColor = Color.PaleGreen
' mappage des nom de colonnes

.MappingName = "FOURNISSEUR"
.PreferredColumnWidth = 125
.PreferredRowHeight = 15

End With


Dim grdColStyle1 As New DataGridTextBoxColumn
With grdColStyle1
.HeaderText = "fournisseur"
.MappingName = "nom_four"
.Width = 50
End With

Dim grdColStyle2 As New DataGridTextBoxColumn
With grdColStyle2
.HeaderText = "adresse"

End With

Dim grdColStyle3 As New DataGridTextBoxColumn
With grdColStyle3
.HeaderText = "nom_com"
.MappingName = "nom commercial"
.Width = 75
.ReadOnly = True
End With

Dim grdColStyle4 As New DataGridTextBoxColumn
With grdColStyle4
.HeaderText = "prenom"
.MappingName = "prenom_com"
.Width = 75
.Alignment = HorizontalAlignment.Center
End With
' ajoute le style d objet au style de la table.

grdTableStyle1.GridColumnStyles.AddRange _
(New DataGridColumnStyle() _
{grdColStyle1, grdColStyle2, grdColStyle3, grdColStyle4})
DtGridFour.TableStyles.Add(grdTableStyle1)
End Sub