Mismo Result Como Parametro De Varias Clases
Artículo |
Re: Mismo Result Como Parametro De Varias Clases
|
Citar: Lo que yo he aprendido es que "Result" no se puede reutilizar si lo paso a otra clase como parámetro. ¿Es correcto?
No creo.
Te pasaré el proyecto y me aclaras que ocurre, pero voy a tardar, vale, es que estoy enfrascado en un lio de código. Cuando pueda te paso el proyectito y me das una colleja. Para aclararme.
Gracias, saludos.
|
gambafeliz [ Jueves, 29 Agosto 2019, 14:43 ]
|
|
Mismo Result Como Parametro De Varias Clases
Comentarios |
Re: Mismo Result Como Parametro De Varias Clases
|
Citar: Lo que yo he aprendido es que "Result" no se puede reutilizar si lo paso a otra clase como parámetro. ¿Es correcto?
No creo.
Te paso el proyecto. Es que tengo la cabeza hecha un lío. Serias tan amable de darme consejos. Me he liado tanto que no se diferencial que serializar de que no, en fin, no sabia yo que estaba yo tan mal. Necesito que pongas en orden mis conceptos, con pequeños consejos, si no es mucho lio para ti. Para mi eso es lo más importante no molestar o molestar lo mínimo.
Gracias.
Nota: En la clase Form intento reducir el código pero al hacerlo me lio. La pregunta esta basada en la línea 180 oResultado = gConn.Exec(sSQL) y más abajo quería pasar oResultado pero no funciona y he decidido usar oResultado.All
Otra cosa en el archivo comprimido en la raíz, hay un CSV demo para que lo conviertas en el programa y lo uses para crear una tabla, pero tienes dos problemas.
1. Que no tienes la base de datos SQLite3
2. Que para arrancar el programa empieza buscando la tabla Gastos que en tu caso no existe y el programa va a petar. Esto tenia que haberlo resuelto, yo, pero lo he pospuesto.
Descripción: |
|
Descargar |
Nombre del archivo: |
myProyecto-0.0.1.tar.gz |
Tamaño: |
19.47 KB |
Descargado: |
40 veces |
Descripción: |
|
Descargar |
Nombre del archivo: |
myProyecto-0.0.1.tar.gz |
Tamaño: |
19.47 KB |
Descargado: |
40 veces |
Descripción: |
|
Descargar |
Nombre del archivo: |
myProyecto-0.0.1.tar.gz |
Tamaño: |
19.47 KB |
Descargado: |
40 veces |
última edición por gambafeliz el Jueves, 29 Agosto 2019, 15:17; editado 1 vez
|
gambafeliz [ Jueves, 29 Agosto 2019, 15:16 ]
|
|
Re: Mismo Result Como Parametro De Varias Clases
|
A lo de la DB y la tabla he añadido esto:
Public Sub Form_Open()
Dim tDef As Variant[]
Me.center
Connections["Connection1"].host = Desktop.GetDirectory("DESKTOP")
Connections["Connection1"].Name = "econ.db"
gConn = Connections["Connection1"]
If Not Exist(Desktop.GetDirectory("DESKTOP") &/ "econ.db") Then
mDB.CreaDatabase(Desktop.GetDirectory("DESKTOP"), "econ.db")
gConn.Open()
gConn.Exec("Create TABLE `Gastos` (`ID` INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT, `Descripción` Text,`Importe` Float,`Cargos` Float,`Lanzamiento` Text,`Vencimiento` Text,`Realizado` Text,`Categoría` Text,`Subcategoría` Text,`Tarjeta` Text,`Cuenta` Text,`Observaciones` Text)")
Else
gConn.Open()
Endif
definirTableView
....
....
A lo del Result... me has enviado la función que "rodea" el problema con eso de los Arrays por lo que no puedo mirar nada, pero me ha surgido una sospecha.
La pregunta es:
En esa secuencia de funciones que recorrían el Result una tras otra...¿Volvías al principio alguna vez?
Después de un
El Result queda Unavailable, o sea no está apuntando a ningún registro porque "se ha pasado". Hay que volver al principio antes de hacer nada con él
|
shordi [ Jueves, 29 Agosto 2019, 18:23 ]
|
|
Re: Mismo Result Como Parametro De Varias Clases
|
A lo de la DB y la tabla he añadido esto:
Public Sub Form_Open()
Dim tDef As Variant[]
Me.center
Connections["Connection1"].host = Desktop.GetDirectory("DESKTOP")
Connections["Connection1"].Name = "econ.db"
gConn = Connections["Connection1"]
If Not Exist(Desktop.GetDirectory("DESKTOP") &/ "econ.db") Then
mDB.CreaDatabase(Desktop.GetDirectory("DESKTOP"), "econ.db")
gConn.Open()
gConn.Exec("Create TABLE `Gastos` (`ID` INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT, `Descripción` Text,`Importe` Float,`Cargos` Float,`Lanzamiento` Text,`Vencimiento` Text,`Realizado` Text,`Categoría` Text,`Subcategoría` Text,`Tarjeta` Text,`Cuenta` Text,`Observaciones` Text)")
Else
gConn.Open()
Endif
definirTableView
....
....
A lo del Result... me has enviado la función que "rodea" el problema con eso de los Arrays por lo que no puedo mirar nada, pero me ha surgido una sospecha.
La pregunta es:
En esa secuencia de funciones que recorrían el Result una tras otra...¿Volvías al principio alguna vez?
Después de un
El Result queda Unavailable, o sea no está apuntando a ningún registro porque "se ha pasado". Hay que volver al principio antes de hacer nada con él
Seguro que va hacer eso. Eres un genio, no he caído por novato
Es mas tiene lógica, lo que ocurre es que lo envío a la clase y cuando lo pido de nuevo en la linea siguiente esta el puntero al final, vaya, es eso.
Muchichisimas gracias.
última edición por gambafeliz el Jueves, 29 Agosto 2019, 19:00; editado 1 vez
|
gambafeliz [ Jueves, 29 Agosto 2019, 18:59 ]
|
|
|
|
Página 2 de 2
|
Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado Usuarios registrados conectados: Ninguno
|
|
|