Unidad 53. DataGrid (II)





53.4. Configuración.

Podríamos hablar de una configuración mínima y adecuada, y de una configuración exhaustiva.

 

  With DataGrid

' Forma de acople del objeto a su contenedor, el Form

.Dock = DockStyle.None 

  ' DockStyle.None, respeta el formato del diseño

  ' DockStyle.Fill, genera espacio para cada columna y activa la barra

  ' horizontal si es necesario.

  ' los demás no generan pegas.

' Color de fondo de la zona no ocupada por el datagrid

.BackgroundColor = Formulario.BackColor

 

' texto del datagrid

.ForeColor = Color.Black

 

' Estilo del borde

.BorderStyle = BorderStyle.None

 

' Estilo del objeto

.CellBorderStyle = DataGridViewCellBorderStyle.Sunken

 

' color de las lineas entre celdas, el grid

.GridColor = SystemColors.ActiveBorder

 

' Columna de cursor lateral

.RowHeadersVisible = False

 

' Asignar color de fondo de la celda que toma el foco

.DefaultCellStyle.SelectionBackColor = Color.White

 

' Asignar color de primer plano de la celda que toma el foco

.DefaultCellStyle.SelectionForeColor = Color.Black

 

' Generar columnas automático

.AutoGenerateColumns = False

 

' fila seleccionada

.RowsDefaultCellStyle.SelectionBackColor = Color.LightGreen

 

   ' Asignar valores apropiados para solo lectura

.AllowUserToAddRows = Estado

.AllowUserToDeleteRows = Estado

.AllowUserToOrderColumns = Estado

.EditMode = DataGridViewEditMode.EditOnEnter

.ReadOnly = False

  ' Sistema de selección de las celdas

  .SelectionMode = DataGridViewSelectionMode.FullRowSelect

  .MultiSelect = False

  ' Dimensionar las columnas del DataGrid para ajustarlas al contenido cargado

  .AutoResizeColumns(DataGridViewAutoSizeColumnsMode.AllCellsExceptHeader)

  ' El formato de tamaño de las celdas, influye sobre las de

  '   AllowUserToResize...

.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.None

  ' El usuario puede o no cambiar el tamaño

  ' en alto o ancho de las filas o columnas

  .AllowUserToResizeColumns = True

  .AllowUserToResizeRows = False

  End With

 

  With DataGrid.ColumnHeadersDefaultCellStyle

  ' Asignar la fila y columna de estilo de cabecera

  .ForeColor = Color.Balck

  .BackColor = Color.Turquoise

  .Alignment = DataGridViewContentAlignment.MiddleCenter

  ' Color fila seleccionada

  .SelectionForeColor = Color.SpringGreen

  .WrapMode = DataGridViewTriState.NotSet

  End With

 

  With DataGrid

.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.DisableResizing

.ColumnHeadersBorderStyle = DataGridViewHeaderBorderStyle.None

 

' Asignar estilo de selección de fila de cabecera por defecto de forma que

' el valor no se superponga a los valores de estilo de las celdas.

.RowHeadersDefaultCellStyle.SelectionBackColor = Color.Tomato

.RowHeadersDefaultCellStyle.BackColor = Color.Blue

.RowHeadersWidthSizeMode = DataGridViewRowHeadersWidthSizeMode.AutoSizeToFirstHeader

 

  ' Asignar el color de fondo para todas las filas y para forma alternativa

  .AlternatingRowsDefaultCellStyle.BackColor = Color.SkyBlue

  .RowsDefaultCellStyle.BackColor = Color.White

  End With

 

Después de una primera fase de configuración, que podrá ser más o menos estándar y según las necesidades de cada momento.

 

Puede haber una segunda fase de ajuste en función de cada programa.

 

  With DataGrid

' Ajuste de ubicación

.Top = CInt(Me.Height * 0.05)

.Left = CInt(Me.Width * 0.05)

.Width = CInt(Me.Width * 0.9)

.Height = CInt(Me.Height * 0.6)

 

' Forma de acople

.Dock = DockStyle.None

 

' Ajustarlo las columnas

.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill

.Columns.Item(0).Width = CInt(DataGrid.Width * 0.1)

.Columns.Item(1).Width = CInt(DataGrid.Width * 0.3)

.Columns.Item(2).Width = CInt(DataGrid.Width * 0.15)

.Columns.Item(3).Width = CInt(DataGrid.Width * 0.2)

.Columns.Item(4).Width = CInt(DataGrid.Width * 0.2)

 

' Asignación, o cambio del texto de cabecera

.Columns(0).HeaderText = "Codigo"

.Columns(1).HeaderText = "Denominación"

.Columns(2).HeaderText = "Importe"

' Alineación de la columna, centrada verticalmente y a la derecha

.Columns(2).DefaultCellStyle.Alignment=DataGridViewContentAlignment.MiddleRight

 End With

 

Y como hay un sin fin de posibilidades, lo mejor es probar y llegar así al modelo que mejor se acople a las necesidades.

Octubre-2010
Pág. 53.2

Atrás  Inicio  Adelante






Página inicial  Cursos Informática Gratuitos

Síguenos en:   Facebook       Sobre aulaClic            Política de Cookies