Programación General > Visual Basic 6.0 e inferiores

 Re: FlexGrid.- Redimensionado automático

(1/1)

sk8erlucas:
Tengo una pregunta sobre el microsofth FelxiGrid.
Cuando lo creo y entro a ejecutar el programa todo anda bien, y puedo cambiar el tamaño de las columnas y filas. Pero lo que yo quiero es que el tamaño se establezca al inicio del programa.
Si alguien sabe como ayudarme le estaría muy agradecido.

sk8erlucas.

J.M.Movilla:
Supongo que lo que deseas es definir la anchura de las columnas...

Esto te lo resolverá:

___________________________

Dim aAncho

Private Sub Form_Load()

' Aquí parametrizas la anchura de las columnas que quieras visualizar; por ejemplo:
aAncho = Array(1350, 3700, 2030, 3000, 550, 2000)
   
End Sub



Private Sub DoInitialSettings()
Dim i%
   
FlexGrid1.Row = 0
FlexGrid1.ColAlignment(0) = 7
   
For i = 0 To FlexGrid1.Cols - 1

' Establece la anchura de la columna
FlexGrid1.ColWidth(i) = aAncho(i)

' Otros parámetros que puedan interesarte...
FlexGrid1.Col = i
FlexGrid1.CellFontSize = 14
FlexGrid1.CellAlignment = 4
       
Next i

FlexGrid1.ScrollTrack = True
FlexGrid1.CellTextStyle = flexTextInset
FlexGrid1.BorderStyle = flexBorderSingle
   
End Sub

__________________________

Saludos

Navegación

[0] Índice de Mensajes