Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Filtro Campos Tabla Paradox (https://www.clubdelphi.com/foros/showthread.php?t=40477)

tarco35 17-02-2007 19:21:33

Filtro Campos Tabla Paradox
 
Saludos.. Tengo una tabla en paradox que tiene entre otros un campo Stock y otro StockMinimo... Compongo el filtro de la tabla asi:
Tabla.Filtro := 'Stock<StockMinimo'
y me da error... sabrian como tendria que escribirlo en esta propiedad?
Gracias.

Lepe 18-02-2007 12:07:02

Código Delphi [-]
tabla.filtro := ' Stock < ' + IntTostr(StockMinimo);
tabla.filtered := true;

Si Stock es un campo de texto y StockMinimo es un string, debes hacerlo así:
Código Delphi [-]
tabla.filtro := ' Stock < ' + QuotedStr(StockMinimo);
tabla.filtered := true;

Saludos

tarco35 18-02-2007 12:11:19

Asi no me va...
 
Tanto Stock como StockMinimo son campos Integer de la misma tabla....
Gracias

Lepe 18-02-2007 21:57:24

Pues si no funciona así, es que paradox no puede implementar filtros de esa forma.

Intenta con un Query que es más flexible:
-Añade un TQuery de la paleta BDE
- elije su propiedad DatabaseName
- En su propiedad sql escribe:
Código SQL [-]
select * from tutabla where stock < stockminimo
- Añade un TDatasource, en su propiedad Dataset, elije el Query1
- Añade un Grid o los controles que quieras para visualizar el resultado, asociándolo con el TDatasource.

Para Abrir la consulta usa Query1.Open y para cerrarla Query1.Close;

Saludos

marcoszorrilla 18-02-2007 22:30:51

Así es Paradox no soporta un filtro de un campo contra otro de la misma tabla, por lo que tendrás que hacer lo que te dice Lepe extraer los datos con una consulta SQL.

Un Saludo.

elguille 19-02-2007 20:28:44

O emplear el evento onfilterrecord que si que funciona para estos menesteres ...

tarco35 20-02-2007 14:19:32

Ahora si....
 
Gracias Lepe.... asi va de maravilla...un saludo a todos


La franja horaria es GMT +2. Ahora son las 19:11:17.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi