|
Bueno después de un poco de calma, pongo lo que lepe me ha comentado:
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.add( 'select * from tclient where (f_cad between :Hoy and :unmes)');
Query1.SQL.add( ' and (f_cade between :hoy and :unmes)');
Query1.parambyname('hoy').asDatetime := Date;
query1.ParamByName('unmes').asdatetime :=date + 30;
Query1.Open;
NO muestra nada en el dbgrid, esté cualquiera de las dos fechas en el rango de hoy + 30.
Donde está el error?
Saludos.
|