Comunidad Gambas-es

Buenas tengo varios GridViews y me sucede una cosa curiosa,

por ejemplo desde Form_load llamo al método CargarGrid(), todo correcto

pero luego desde por ejemplo:

Public Sub txtFiltro2_KeyRelease()

sFiltroTask = txtFiltro2.Text

rstResultado = cTareas.GetTaskByFilter(sFiltroTask)
CargarGrid()

End


y el grid crece en cuanto a rows, y no lo entiendo porque con el .Clear debería dejar inicializado el grid no???





Public Sub CargarGrid()

grvTareas.Clear

grvTareas.Columns.Count = rstResultado.Fields.Count - 1
grvTareas.Header = rstResultado.Fields.Count - 1
grvTareas.Columns[0].Title = "ID_TAREA"
grvTareas.Columns[1].Title = "COD_TAREA"
grvTareas.Columns[2].Title = "DESCRIPCION"
grvTareas.Columns[3].Title = ""

grvTareas.Columns[0].width = 0
grvTareas.Columns[0].Resizable = False
grvTareas.Columns[1].width = 100
grvTareas.Columns[1].Resizable = False
grvTareas.Columns[2].width = 425
grvTareas.Columns[2].Resizable = False
grvTareas.Columns[3].width = 25
grvTareas.Columns[3].Resizable = False

'::::::::::::::::::::::::::::::::::::::::::::::::::::

rstResultado.MoveFirst

Do While rstResultado.Available
grvTareas.Rows.Insert(i, 1)
grvTareas[i, 0].Text = rstResultado!ID_TAREA
grvTareas[i, 1].Text = rstResultado!COD_TAREA
grvTareas[i, 2].Text = rstResultado!DESCRIPCION
If rstResultado!ES_BAJA = "+" Then
grvTareas[i, 3].Picture = gConst.picBaja
Else If rstResultado!ES_CERRADO = "+"
grvTareas[i, 3].Picture = gConst.picCerrado
Else
grvTareas[i, 3].Picture = gConst.picActivo
End If

i += 1
rstResultado.MoveNext
Loop

End

Saludos ya me diréis qué hago mal.

No es esa la manera de cargar datos en un GridView desde una tabla. La clase Gridview dispone del evento Data que se dispara cada vez que es necesario leer una celda o sincronizar una celda con la fuente de datos (result).
Te he hecho un pequeño ejemplo para que veas cómo funciona a grosso modo.

De todas formas el código es tan simple que no me resisto a colocarlo aquí para quien no quiera bajarse el archivo.
Creas un proyecto gráfico y en los componentes añades el gb.db y el gb.db.sqlite
Luego al fMain le estableces la propiedad Arrange a "Fill" y añades un gridview. Al gridview le asignas la propiedad header a "Horizontal" (dices que no te gustan las cabeceras de la izquierda), y la propiedad Expand a True, para que ocupe todo el form.
Naturalmente el tema de cómo se llama la base de datos y dónde está, tendrás que cambiarlo para la base de datos y la tabla que elijas.

Luego pegas éste código:

okis muchas gracias, lo pruebo y os cuento.
Ya que estamos paso a preguntar sobre este tema una forma que tengo siempre de desarrollar y que aquí no la he visto mucho y no se si es correcta con Gambas.

Yo para los GridViews lo que suelo usar es, le paso por referencia el objeto [GRIDVIEW] a una función pública de la capa DAO que devuelve el objeto ya relleno.

Inidicar que esta forma de proceder he utilizado siempre desde .net (webforms y windowsforms).

Saludos.

calcena escribió: [Ver mensaje]

okis muchas gracias, lo pruebo y os cuento.
Ya que estamos paso a preguntar sobre este tema una forma que tengo siempre de desarrollar y que aquí no la he visto mucho y no se si es correcta con Gambas.

Yo para los GridViews lo que suelo usar es, le paso por referencia el objeto [GRIDVIEW] a una función pública de la capa DAO que devuelve el objeto ya relleno.

Inidicar que esta forma de proceder he utilizado siempre desde .net (webforms y windowsforms).

Saludos.

Si funciona, es correcta por definición

Pero es algo que contradice la filosofía de funcionamiento del propio GridView, que como ya has visto tiene su propio mecanismo de "relleno" a través del evento Data.
El GridView puede mostrar cualquier cosa, pero en su relación con las bases de datos muestra lo contenido en un Result. Enviar ese Result a una función pública de la capa DAO, etc. etc. sí me parece correcto (aunque ¿para qué cuando es tan fácil rellenarlo?), pero una vez recuperados los datos desde la BD, el Gridview es capaz él solito de manejarse sin problemas con ellos sin "salirse" del Form que lo contiene (cosa esa de "salirse" que, por otra parte, puede no ser muy deseable al infringir el principio de encapsulación de la POO)...
Reconozco que yo uso esa técnica de pasar un formulario para que me lo devuelvan "relleno" a una función pública pero la diferencia es que un formulario es algo "tonto" es decir no tiene incorporado ninguna manera para recuperar los datos por sí mismo... aunque no creo que costase mucho hacer una clase formulario heredada que lo tuviese, ahora que lo pienso... mmmm interesante cuestión, ahora que estoy de vacaciones...mmmm Lo pensaré.

El tema DAO y todo eso esta bien pero siempre es util si tenes que sacar datos de una base de datos pero los gridviews tambien sriven para trabajar con datos desde otra fuente, ya sea generados por algun algoritmo o extraidos desde un archivo de texto por ejemplo.
Dicho esto, yo sugiero que uses el método que te indica Shordi del evento data. Paso a explicar algunas cosas que a mi me resultaron útiles y practicas.



Saludos.

Buenas paso a exponer mis avances y problemas sobre este tema, he decidido hacerlo como siempre hago, pasando por parámetro el objeto y recuperando uno lleno, y pasando el Resulset.

Public Sub Form_Open()
Dim n As Integer = 0
Me.Title = "Tareas"
IniBuscadores()
rstResultado = cTareas.GetTaskByFilter(sFiltroTask)
grvTareas = cTareas.GetGrid(grvTareas, rstResultado)
End

En la clase cTareas

Public Sub GetGrid(ByRef objGridView As GridView, rstResultado As Result)

Dim objResultado As GridView
Dim i As Integer = 0

objGridView.Clear()
objGridView.Columns.Count = rstResultado.Fields.Count - 1
objGridView.Header = rstResultado.Fields.Count - 1

objGridView.Columns[0].width = 0
objGridView.Columns[0].Resizable = False
objGridView.Columns[1].width = 100
objGridView.Columns[1].Resizable = False
objGridView.Columns[2].width = 425
objGridView.Columns[2].Resizable = False
objGridView.Columns[3].width = 25
objGridView.Columns[3].Resizable = False

'::::::::::::::::::::::::::::::::::::::::::::::::::::

rstResultado.MoveFirst

Do While rstResultado.Available
objGridView.Rows.Insert(i, 1)
objGridView[i, 0].Text = rstResultado!ID_TAREA
objGridView[i, 1].Text = rstResultado!COD_TAREA
objGridView[i, 2].Text = rstResultado!DESCRIPCION
If rstResultado!ES_BAJA = "+" Then
objGridView[i, 3].Picture = gConst.picBaja
Else If rstResultado!ES_CERRADO = "+"
objGridView[i, 3].Picture = gConst.picCerrado
Else
objGridView[i, 3].Picture = gConst.picActivo
End If
i += 1
rstResultado.MoveNext
Loop

End

Hasta aquí todo muy correcto, en el load la cosa va de lujo.
Ahora viene el problema (que no comprendo porque es el mismo principio)

Tengo un filtro el cual (aunque no sea muy correcto por tema de rendimiento concurrente) al pulsar una tecla recarga la GridView, para lo que realizo lo siguiente:


Public Sub txtFiltro2_KeyRelease()
sFiltroTask = txtFiltro2.Text
rstResultado = cTareas.GetTaskByFilter(sFiltroTask)

grvTareas = cTareas.GetGrid(grvTareas, rstResultado)

End

Pues bién el problema es que me dice que mi GridView (grvTareas) es NULL cuando si que existe, lógicamente.
¿Dónde está el problema? ¿dónde está la pelotita....?

Saludos y gracias como siempre.


Esta forma de desarrollo la veo, no se porque más clarificadora ya que cada Clase implementa su devolución de objetos (DropDown, ListView....)

Nada he probado a pasarlo como método en vez de como función pero no consigo que el grid me quede limpio para el reinicio del mismo.

He probado con Clear, con Refresh()

Alguien saber como puedo dejar reiniciado un gridview para poder pasarlo por referencia y que se cargue correctamente.

Esta misma metodología la he utilizado en otros lenguajes y siempre funciona correctamente, algo hay en el reinicio del componente que no hago bien.

Saludos.


Os incluyo una imagen del resultado de las pruebas y el código, el problema sigue residiendo en el momento de teclear para realizar un filtrado.

Llevas una línea... "atípica" de desarrollo del tema, propia de otro tipo de lenguajes, por tanto lo que te vaya surgiendo muchas veces será casi único y al final puedes encontrarte navegando en aguas desconocidas.
Tu código, por definición, debe ser lento y engorroso (salvo que sólo manejes unas pocas líneas, con lo que quedaría disimulado).
Sobre lo que preguntas... ¿Has probado a destruir el objeto (Grid=null) y crearlo otra vez grid=new gridview?

shordi escribió: [Ver mensaje]

Llevas una línea... "atípica" de desarrollo del tema, propia de otro tipo de lenguajes, por tanto lo que te vaya surgiendo muchas veces será casi único y al final puedes encontrarte navegando en aguas desconocidas.
Tu código, por definición, debe ser lento y engorroso (salvo que sólo manejes unas pocas líneas, con lo que quedaría disimulado).
Sobre lo que preguntas... ¿Has probado a destruir el objeto (Grid=null) y crearlo otra vez grid=new gridview?

Buenas shordi, bueno no entiendo lo que comentas de que por definición debe ser lento y engorroso, al final es separar por capas la aplicación que en OOP se utiliza normalmente, he probado tu forma de hacerlo pero el problema que tengo es que si mi variable rstResultado se vuelve a reaprovechar con otro método se vuelve a ejecutar la recarga del método _DATA.

Tal como se ve en la imagen que he adjuntado, lo que pretendo es que pulsando sobre el textbox (que lo paso como parámetro) se filtren los resultados. Pues con todos lo que he testeado nada de nada.

Alguna idea para este tipo de problema?

Tu ejemplo Shordi va muy bien pero al no tener filtro no es la misma problemática.

Respecto a tu propuesta:



me dice el compilador : NOT ENOUGH ARGUMENTS.....se necesita algún argumento en concreto para instanciar un GridView nuevo??

Saludos.