Revision en segundo plano de una tabla paradox
Saludos, tengo un problemita, tengo una aplicación que maneja el inventario de una bodega (de una importadora), pero necesito que mientras la aplicación se encuentre ejecutándose esta verifique la tabla de datos de productos buscando 2 cosas:
1 que la cantidad de unidades sea mayor a cero (de no ser así notificar) 2 que la cantidad de unidades sea mayor al piso (cantidad de unidades minimas establecidas al momento de agregar el producto) quiero que esto se haga en segundo plano, pero no se como, alguna idea? Composición de la tabla de datos: |Codigo|Nombre|Unidades|Costo|Piso| Saludos, y gracias de antemano Chrids |
En segundo plano podría ser ocultandolo al usuario, por ejemplo con un timer y que se ejecute cada X segundos.
la única forma que tendrás de hacerlo es por consultas (Tquery), es lo más eficiente. 1 que la cantidad de unidades sea mayor a cero (de no ser así notificar) Para cada registro de esa consulta, deberás notificarlo como quieras, mediante un log, una ventanita que se abre e indica los nombres de productos, etc. 2 que la cantidad de unidades sea mayor al piso (cantidad de unidades minimas establecidas al momento de agregar el producto) Lo mismo que antes, todos los registros que haya en esa consulta, serán los que quieres notificar. Intuyo que no has usado un Tquery, así que pon uno en el form, establece su propiedad DatabaseName, en la propiedad sql haz clic y escribe ese código sql. Añade un TDatasource, en su propiedad Dataset, elige el Query1. Pon un Grid (para ver los resultados) su propiedad Datasource, que apunte a un TDatasource anterior. Establece la propiedad Active del TQuery a true y verás los resultados incluso en tiempo de diseño. Saludos |
Cita:
DataModule1.DataSource1.Table1.Database := {direción} DataModule1.DataSource1.Table1.Data := {direción} DataModule1.DataSource1.Table1.Active o algo así, para hacer las busquedas uso un locate, no habrá forma de hacerlo con .first, .next y la propiedad Eof? o no es recomendable? |
Tengo otra pregunta, que pasa si hago un while cada X segundos, la aplicación se quedaría pagada mientras termina no?
|
Lo mas oportuno sería lanzar un Thread que vaya haciendo el trabajo.
En el directorio Demos\db\BkQuery tienes la aplicación BkQuery que te ilustra como hacerlo. |
Gracias por la ayuda
|
La franja horaria es GMT +2. Ahora son las 14:45:56. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi