[VB.NET]Ridimensionare Colonne Datagrid

[Peter_Pan]

Problema con questo maledetto datagrid, ho scritto questo codice:

m_dr = m_dt.NewRow
            m_dr("Nome") = strNome ' scrivi il codice che legge dal file di testo
            m_dr("Tempo") = strTotale ' scrivi il codice che legge dal file di testo
            m_dt.Rows.Add(m_dr)

            Dim TSAuthors As New DataGridTableStyle
            TSAuthors.MappingName = "Nome"
            Dim TCFirstName As New DataGridTextBoxColumn

            TCFirstName.MappingName = "Nome"
            TCFirstName.HeaderText = "First Name"
            TCFirstName.Width = 75
            TSAuthors.GridColumnStyles.Add(TCFirstName)


            dgtTimer.TableStyles.Add(TSAuthors)

            
            dgtTimer.DataSource = m_dt

Creo un dataTable
poi aggiungo delle righe con un contenuto e poi vorrei specificare la grandezza della prima colonna, ma non mi ridimensiona niente, anzi dopo la prima volta che legge questo codice poi va in errore, nella form load ho questo codice:

m_dt.Columns.Add("Nome")
m_dt.Columns.Add("Tempo")

HELP

[Peter_Pan]

mi rispondo da solo, può servire ad altri:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        m_dt.Columns.Add("Nome")
        m_dt.Columns.Add("Tempo")

        '*************************************************
        'Per dare delle impostazioni alle singole colonne
        Dim TSAuthors As New DataGridTableStyle
        TSAuthors.MappingName = "Test"  'Nome del DataTable
        Dim TCFirstName As New DataGridTextBoxColumn
        Dim TCTempo As New DataGridTextBoxColumn

        TCFirstName.MappingName = "Nome"    'Nome della colonna del DataTable
        TCTempo.MappingName = "Tempo"       'Nome della colonna del DataTable

        TCFirstName.HeaderText = "Nome"     'Si può scrivere cosa deve comparire come titolo della colonna
        TCTempo.HeaderText = "Tempo"
        TCFirstName.Width = 70              'Dimesione della prima colonna
        TCTempo.Width = 80                  'Dimesione della seconda colonna

        TSAuthors.GridColumnStyles.Add(TCFirstName)
        TSAuthors.GridColumnStyles.Add(TCTempo)

        dgtTimer.TableStyles.Add(TSAuthors)
        '*************************************************

    End Sub

[mardok30]

Ho lo stesso problema, non riesco a ridimensionare le colonne del datagrid, usando il codice postato da Peter_Pan:

Dim m_dt As New DataTable 

        m_dt.Columns.Add("Nome")
        m_dt.Columns.Add("Tempo")

        '***************************************
        'Per dare delle impostazioni alle singole colonne
        Dim TSAuthors As New DataGridTableStyle
        TSAuthors.MappingName = "Test"  'Nome del DataTable
        Dim TCFirstName As New DataGridTextBoxColumn
        Dim TCTempo As New DataGridTextBoxColumn

        TCFirstName.MappingName = "Nome"    'Nome della colonna del DataTable
        TCTempo.MappingName = "Tempo"       'Nome della colonna del DataTable

        TCFirstName.HeaderText = "Nome"     'Si può scrivere cosa deve comparire come titolo della colonna
        TCTempo.HeaderText = "Tempo"
        'TSAuthors.PreferredColumnWidth = 180

        TCFirstName.Width = 30              'Dimesione della prima colonna
        TCTempo.Width = 180                  'Dimesione della seconda colonna

        TSAuthors.GridColumnStyles.Add(TCFirstName)
        TSAuthors.GridColumnStyles.Add(TCTempo)

        DataGrid1.DataSource = m_dt 
        DataGrid1.TableStyles.Add(TSAuthors)

Le righe in rosso le ho inserite io, il problema è che la larghezza delle colonne è sempre quella della proprietà preferredcolumnwidth che per default è 75. Lo trovo abbastanza complicato sto datagrid, sono da poco passato al NET
Ciao