Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus-es / 2017-06

actualizar un form con datos importados

3 messages · 3 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

hfiandor

Estimados colegas:

Tengo una aplicación nueva, donde he puesto un PageControl con varios tabSheets. Cada tabsheet está asociado a una tabla distinta.

En cada uno de ellos he puesto un botón para "Importar".

El procedure correspondiente abre un fichero .csv donde hay información para cada campo de la tabla correspondiente.

Esta operación parece que la hace bien.

Tengo otro botón para "Ver informe", que hace un Reporte con los datos de la tabla.

Parece que lo hace bien.

Sin embargo:

En cada tabsheet tengo una barra de navegacion asociada a la tabla correspondiente.

Despues de Importar, y ver que la tabla tiene la información,

al moverme con Last de la barra de Navegacion, veo que no ha incluido en el Form lo que se Importó.

He dado mil vueltas y no lo logro.

Qué hice:

Abro un Mensaje de confirmación preguntando "Debe Salir para incorporar lo Importado. Desea ....", y al oprimir "Si"

se cierra el Form, va para la unit "Salir" (se cierra la aplicación) y el operario debe comenzar de nuevo,

y entonces aparece lo que se había Importado y todo correcto.

Si alguien conoce una rutina mejor que esta, que funciona pero me parece un poco troglodita, le voy a agradecer que me enseñe.

Saludos

Ing. Héctor F. Fiandor Rosario

------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20170609/e3bb6c97/attachment.html>

Reply by email

Fredy Gonzales
to hfiandor

Disculpa pero por lo que entiendo, dentro del tabsheet poner un form?

El 9/6/2017 09:56, "hfiandor via Lazarus-es" <

lazarus-es en lists.lazarus-ide.org> wrote 58 lines
Estimados colegas: Tengo una aplicación nueva, donde he puesto un PageControl con varios tabSheets. Cada tabsheet está asociado a una tabla distinta. En cada uno de ellos he puesto un botón para "Importar". El procedure correspondiente abre un fichero .csv donde hay información para cada campo de la tabla correspondiente. Esta operación parece que la hace bien. Tengo otro botón para "Ver informe", que hace un Reporte con los datos de la tabla. Parece que lo hace bien. Sin embargo: En cada tabsheet tengo una barra de navegacion asociada a la tabla correspondiente. Despues de Importar, y ver que la tabla tiene la información, al moverme con Last de la barra de Navegacion, veo que no ha incluido en el Form lo que se Importó. He dado mil vueltas y no lo logro. Qué hice: Abro un Mensaje de confirmación preguntando "Debe Salir para incorporar lo Importado. Desea ....", y al oprimir "Si" se cierra el Form, va para la unit "Salir" (se cierra la aplicación) y el operario debe comenzar de nuevo, y entonces aparece lo que se había Importado y todo correcto. Si alguien conoce una rutina mejor que esta, que funciona pero me parece un poco troglodita, le voy a agradecer que me enseñe. Saludos Ing. Héctor F. Fiandor Rosario _______________________________________________ Lazarus-es mailing list Lazarus-es en lists.lazarus-ide.org http://lists.lazarus-ide.org/listinfo/lazarus-es

------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20170609/8dcbdc3e/attachment.html>

Reply by email

Martin Gomez
to hfiandor: Estimados colegas: Tengo una aplicación nueva, donde he puesto un PageControl con varios…

Estimado Hector
Yo te sugeriría que en tu rutina de importación pongas tabla.BeginUpdate;
{importacion de datos}
tabla.EndUpdate;

con eso logras que los cambios sucedan de forma "desconectada" de los controles visuales.

Como segunda alternativa, no te estará faltando un transaction.Commit al final?
Recuerda que SQLdb crea transacciones automáticas, las pidas o no. (eso Delphi no lo hacía así)

2017-06-09 11:56 GMT-03:00 hfiandor via Lazarus-es < lazarus-es en lists.lazarus-ide.org>:

Show quoted text 58 lines
Estimados colegas: Tengo una aplicación nueva, donde he puesto un PageControl con varios tabSheets. Cada tabsheet está asociado a una tabla distinta. En cada uno de ellos he puesto un botón para "Importar". El procedure correspondiente abre un fichero .csv donde hay información para cada campo de la tabla correspondiente. Esta operación parece que la hace bien. Tengo otro botón para "Ver informe", que hace un Reporte con los datos de la tabla. Parece que lo hace bien. Sin embargo: En cada tabsheet tengo una barra de navegacion asociada a la tabla correspondiente. Despues de Importar, y ver que la tabla tiene la información, al moverme con Last de la barra de Navegacion, veo que no ha incluido en el Form lo que se Importó. He dado mil vueltas y no lo logro. Qué hice: Abro un Mensaje de confirmación preguntando "Debe Salir para incorporar lo Importado. Desea ....", y al oprimir "Si" se cierra el Form, va para la unit "Salir" (se cierra la aplicación) y el operario debe comenzar de nuevo, y entonces aparece lo que se había Importado y todo correcto. Si alguien conoce una rutina mejor que esta, que funciona pero me parece un poco troglodita, le voy a agradecer que me enseñe. Saludos Ing. Héctor F. Fiandor Rosario _______________________________________________ Lazarus-es mailing list Lazarus-es en lists.lazarus-ide.org http://lists.lazarus-ide.org/listinfo/lazarus-es
​ Most good programmers do programming not because they expect to get paid or get adulation by the public, but because it is fun to program. ​ ​ *Linus Torvalds* ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20170616/445977a8/attachment.html>

Reply by email