Hola mi pregunta es .
que puedo hacer para que los encabezados del grid no se pierdan cuando aparece la barra de desplazamiento si se bajan las barraslos encabezados se esconden quiero que los encabezados siempre esten visibles
09/04/2007, 12:19
| ||||
| ||||
 cabeceras en mshflexgrid Hola mi pregunta es . que puedo hacer para que los encabezados del grid no se pierdan cuando aparece la barra de desplazamiento si se bajan las barraslos encabezados se esconden quiero que los encabezados siempre esten visibles |
|
09/04/2007, 14:21
| ||||
| ||||
| Re: cabeceras en mshflexgrid cambia la propiedad fixedrows si tienes los encabezados en la primera fila, escribe algo como : msflexgrid1.fixedrows=1 (enclava solo la primera fila) msflexgrid1.fixedrows=2 (enclava las dos primeras filas), y asi con la cantidad de filas que quieras fijar lo mismo para las columnas pero on la propiedad fixedcols |
|
10/04/2007, 08:54
| ||||
| ||||
| Re: cabeceras en mshflexgrid Muchas gracias... ahora no funciona como realmente necesito que fucione paso el codigo donde inicializo el control para que me digan donde fallo o que debo de quitar o donde debo de poner la linea que Kruzado comento: Sub doInicializarGridMateriasDescargar() 'INICIO DE OPTIMIZAR CÓDIGO With dgdMateriasDescargar .AddItem " " 'Agregar nuevo elemento al control .Cols = 5 'Inicializar con 5 columnas al grid de materias .Rows = 2 'Inicializar con 2 renglones al grid de materias .TextMatrix(0, 1) = "Clave Materia" 'Inicializar control .TextMatrix(0, 2) = "Nombre Materia" 'Inicializar control .TextMatrix(0, 3) = "Numero de renglon" 'Inicializar control .TextMatrix(0, 4) = "Id Evaluaciones" 'Inicializar control .ColWidth(0, 0) = 400 'Asignar el ancho de la columna del grid .ColWidth(1, 0) = 1500 'Asignar el ancho de la columna del grid .ColWidth(2, 0) = 4000 'Asignar el ancho de la columna del grid .ColWidth(3, 0) = 0 .ColWidth(4, 0) = 0 .Left = 180 'Asignar la ubicacion del grid .Top = 1620 'Asignar la ubicacion del grid .Height = 1815 'Asignar el alto del grid .Width = 6225 'Asignar el ancho del grid .Visible = True 'Inicializar control End With 'FIN DE OPTIMIZAR CÓDIGO End Sub |
|
10/04/2007, 09:32
| ||||
| ||||
 Re: cabeceras en mshflexgrid Resuelto... muchas gracias por todas las aportaciones hechas ahora solo tengo que acoplar el resto del codigo y hacer pruebas de fallar aqui nos veremos nuevamente  |
|
10/04/2007, 10:24
| ||||
| ||||
| Re: cabeceras en mshflexgrid Lo que hice fue en el diseño del grid solo quitar la opcion de ColumnHeaders y en el codigo eliminar la linea de agregar el elemento (AddItem=" ") y agregar la linea de kruzado y me quedo de la siguiente manera: Sub doInicializarGridMateriasDescargar() 'INICIO DE OPTIMIZAR CÓDIGO With dgdMateriasDescargar .Cols = 5 'Inicializar con 5 columnas al grid de materias .Rows = 2 'Inicializar con 2 renglones al grid de materias .FixedRows = 1 'Linea de kruzado .TextMatrix(0, 1) = "Clave Materia" 'Inicializar control .TextMatrix(0, 2) = "Nombre Materia" 'Inicializar control .TextMatrix(0, 3) = "Numero de renglon" 'Inicializar control .TextMatrix(0, 4) = "Id Evaluaciones" 'Inicializar control .ColWidth(0, 0) = 400 'Asignar el ancho de la columna del grid .ColWidth(1, 0) = 1500 'Asignar el ancho de la columna del grid .ColWidth(2, 0) = 4000 'Asignar el ancho de la columna del grid .ColWidth(3, 0) = 0 'Asignar el ancho de la columna del grid .ColWidth(4, 0) = 0 'Asignar el ancho de la columna del grid .Left = 180 'Asignar la ubicacion del grid .Top = 1620 'Asignar la ubicacion del grid .Height = 1815 'Asignar el alto del grid .Width = 6225 'Asignar el ancho del grid .Visible = True 'Inicializar control End With 'FIN DE OPTIMIZAR CÓDIGO End Sub |
