Datagrid customization for custom objects

[Will]

Hello,

I wrote a custom object that Inherits from CollectionBase.
This would, my object fits in a datagrid.

However, my object (_obj) contains data and references I do NOT want the
datagrid to display.

I tried doing this :

Dim dtgStyle As New DataGridTableStyle
dtgStyle.MappingName = "Parts"

Dim colId As New DataGridTextBoxColumn
Dim colName As New DataGridTextBoxColumn
<...>

With colId
.MappingName = "id"
.HeaderText = "ID"
.TextBox.Enabled = False
End With

With colName
.MappingName = "name"
.HeaderText = "Nom"
End With

With colNotes
.MappingName = "notes"
.Width = 0
End With

<...>

With dtgStyle.GridColumnStyles
.Add(colId)
.Add(colName)
.Add(colSerieSize)
.Add(colEnabled)
.Add(colTrained)

' hidden
.Add(colNotes)
.Add(colWeight)
End With

With dtgParts

.TableStyles.Clear()
.TableStyles.Add(dtgStyle)
.DataSource = _obj
End With


This does not seem to help. DO you know how I can acheive this ?

Regards,
Will

[will]

Hello folks,

Just coming back here because I really don't get it.
I copied below the code I run to figure out how to get it working.

The style does not work because the column width does not change. Also,
width=0 does not work either so I cannot hide a column.

What is wrong ?
Here is my main:

Module modMain

Public Sub main()
Dim stuffs As New clsStuffs

stuffs.add(New clsStuff("aa"))
stuffs.add(New clsStuff("bb"))
stuffs.add(New clsStuff("cccc"))
stuffs.add(New clsStuff("dddd"))

Dim dlg As New Form1
Dim dtgStyle As New DataGridTableStyle
dtgStyle.MappingName = "whatdoIputhere"

Dim colName As New DataGridTextBoxColumn
Dim colID As New DataGridTextBoxColumn
Dim colEnabled As New DataGridBoolColumn

With colName
.MappingName = "name"

.Width = 300
.HeaderText = "pouet"
End With

With colEnabled
.MappingName = "enabled"
.Width = 100
End With

With colID
.MappingName = "id"
.Width = 0
End With

dtgStyle.GridColumnStyles.Clear()
dtgStyle.GridColumnStyles.Add(colName)
dtgStyle.GridColumnStyles.Add(colEnabled)
dtgStyle.GridColumnStyles.Add(colID)
With dlg

.DataGrid1.TableStyles.Clear()
.DataGrid1.TableStyles.Add(dtgStyle)
.DataGrid1.DataSource = stuffs

.ShowDialog()
End With

End Sub
End Module

Here is the clsStuffs class :
Imports System.ComponentModel

Public Class clsStuffs
Inherits CollectionBase
Public Function add(ByVal stuff As clsStuff) As Integer
Return (list.Add(stuff))
End Function
End Class


and finally :
Imports System.ComponentModel

Public Class clsStuff

Private Shared _count As Integer
Private _id As Integer
Private _name As String
Private _enaabled As Boolean

Public Property name() As String
Get
Return _name
End Get
Set(ByVal Value As String)
_name = Value
End Set
End Property

'<Browsable(False)> _
Public ReadOnly Property id() As Integer
Get
Return _id
End Get
End Property

Public Sub New(ByVal name As String)
_name = name
_id = _count
_count += 1

End Sub

Public Property enabled() As Boolean
Get
Return _enaabled
End Get
Set(ByVal Value As Boolean)
_enaabled = Value
End Set
End Property

End Class

to get it working you also need a form called form1 containing a
datagrid called datagrid1.
ANy help appreciated.
Will