AJUSTANDO A LARGURA DO DATAGRID VS2005

AYRES 20/11/2006 16:28:02
#185416
Galera eu tenho o seguinte exemplo:
Imports System.Data.OleDb


Public Class Form1
    Private Sub openconex()
        Dim column As New DataGridTextBoxColumn
        Dim tbgrupo As New DataTable
      
        Dim dsDependentes As New DataSet
        Dim tableStyle As New DataGridTableStyle

        ssql = ""
        ssql = "Select * from v3 where DEF = 'NCAR'"
        da = New OleDbDataAdapter(ssql, conn)
        tbgrupo = New DataTable
        da.Fill(tbgrupo)
        DataGrid.DataSource = tbgrupo

        conn.Open()
        tableStyle.MappingName = tbgrupo.TableName.ToString


        'primeira coluna
        column.MappingName = "Descrição"
        column.HeaderText = "Descrição"
        column.Width = 225
        tableStyle.GridColumnStyles.Add(column)

        'segunda coluna
        column = New DataGridTextBoxColumn
        column.MappingName = "RT"
        column.HeaderText = "RT"
        column.Width = 25
        tableStyle.GridColumnStyles.Add(column)

        'terceira coluna
        column = New DataGridTextBoxColumn
        column.MappingName = "Solução"
        column.HeaderText = "Solução"
        column.Width = 142
        tableStyle.GridColumnStyles.Add(column)

        'quarta coluna
        column = New DataGridTextBoxColumn
        column.MappingName = "PartNumber"
        column.HeaderText = "PartNumber"
        column.Width = 80
        tableStyle.GridColumnStyles.Add(column)



        tableStyle.BackColor = System.Drawing.Color.LightCyan 'estilo de cor do datagrid

        DataGrid.TableStyles.Add(tableStyle) 'aqui o datagrid nao reconhece o .tableStyles
        DataGrid.DataSource = tbgrupo


        conn.Close()
    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        openconex()
    End Sub

End Class

Imports System.Data.OleDb
Module Module1
Public cmd As OleDbCommand
Public da As OleDbDataAdapter
Public strConn As String = "Data Source = C:\Analyzer\BD\falhas.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"
Public conn As OleDbConnection = New OleDbConnection(strConn)
Public ssql As String 'var. que define a consulta
Public tableStyle As New DataGridTableStyle

End Module

quando eu usava o VS2003 o componente datagrid tem a propriedade TableStyle. Agora estu fazendo um exemplo no VS2005 versao completa e quando coloco o componente DatagridView nao tem essa propriedade TableStyle.

Acredito que devido isso nao esto conseguindo ajustar a largura das colunas conforme configurado manualmente.pois para rodar meu programa eu tiro a linha
DataGrid.TableStyles.Add(tableStyle)

Alguem pode ajudar o porque na ajusta as colunas conforme configurado?

thanks!
AYRES 27/11/2006 14:52:19
#186500
galera eu ja consegui resolver fazendo assim:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
opengrid()
End Sub
    Private Sub opengrid()

        ssql = ""
        ssql = "Select * from v3 where DEF = 'NCAR'"
        cmd = New OleDbCommand(ssql, conbi)
        dabi = New OleDbDataAdapter(cmd)
        dtbi = New DataTable
        dabi.Fill(dtbi)
        DataGridView1.DataSource = dtbi

        conbi.Open()

        DataGridView1.Columns(0).Width = 20
        DataGridView1.Columns(0).HeaderText = "Nome"

        DataGridView1.Columns(1).Width = 20
        DataGridView1.Columns(1).HeaderText = "Nome"

        conbi.Close()

    End Sub


Agoraso tenho outro desafio, setar a sequencia que deve carregar as colunas no datagridview.

alguem pode ajudar?

thanks
Tópico encerrado , respostas não são mais permitidas
Voltar