Buenas a todos! Antes de mi pregunta, y para suavizar un poco las mangueadas o peticiones respecto a mi alto grado de ignorancia en la mayoría de los aspectos de la programación en VB6, voy a contar una breve reseña y/o anécdota como introducción al tema que atañe en este momento:
Siempre tuve un dilema respecto a la utilización de las grillas, cuando aprendí a programar cuestiones de grids, lo hice utilizando el FlexGrid básico, común y corriente, incorporado al vb, pero sentía un vacío, como que "le faltaba algo", y era que no me gustaba "como se veía", entonces busqué otros recursos como el Listview, un par de grillas de código abierto que andaban dando vueltas por la web, hasta que me topé con el SGrid (de vbaccelerator.com) y quedé maravillado, era preciosa, mucho mas veloz en cuanto a carga, visualmente adoptaba varios estilos.
Y como es obvio, la comencé a utilizar y adaptar incluso en varios proyectos que estaban funcionando (si, lo se, no se debe hacer), solo atraído por su belleza, sin importarme "lo de adentro", hasta que comenzó a tener ciertos bugs, no muy frecuentes, luego aparecieron con mas frecuencia, hasta que dichos bugs comenzaban a COLGAR LA APLICACIÓN y cerrarla, por lo cual tomé una decisión drástica, DEJAR DE USARLA, como quien no quiere dejar de fumar (yo fumo actualmente).
Y entonces, hice como hacen muchos, volví con "mi primer y antigua novia", la mal ponderada y mal criticada FLEXGRID, y le encontré los puntos fuertes, encontré que es la mas personalizable y "flexible" (como lo dice su nombre), y con un poco de imaginación, creatividad y una pizca de código, se pueden hacer mil maravillas, aunque no lo crean.
Bueno, toda esa introducción fue para darle un toque mas "poético" a la cuestión, para que no sea tan frío el post
. En fin, un asunto que me está trabando es justamente algo muy importante, y es la CARGA DE REGISTROS / FILAS en la grilla, básicamente, lo está haciendo muy lento, ni hablar de cargarle 1000 registros. Lo estoy haciendo de esta manera:
Public Sub CargaFlexGRID(rx As ADODB.Recordset, f As Form, Grilla As MSFlexGrid)
With Grilla
.Clear
.Rows = rx.RecordCount + 1
.Cols = rx.Fields.Count + 1
For I = 1 To rx.Fields.Count
.Row = 0
.Col = I
.Text = rx.Fields(I - 1).Name
Next I
For I = 1 To rx.RecordCount
For J = 1 To rx.Fields.Count
.Row = I
.Col = J
.Text = rx.Fields(J - 1).Value
Next J
rx.MoveNext
Next I
End With
End Sub
Y también noto dicho comportamiento lento, al aplicarle un mísero formato de fuentes (FONTS) en sus celdas.
No se si es mi PC la que anda mal (xq necesita urgente un format) o realmente esta grilla se comporta así, desearía saber que criterios manejais vosotros con respecto a las grillas.
Desde ya muchas gracias.
Saludos desde Argentina.
