Hola
Solo veo algo que no entiendo:
En la sentencia del query el parametro esta entre comillas, por que?, no se.
Prueba asi en el query::
Código SQL
[-]Select * from corte where fechadeventa = :fecha
Y tal vez vea mejor la fecha asi:
Código Delphi
[-]
var Fecha1: TDate
begin
Fecha1:= Now;
query1.Close;
query1.ParamByName('fecha').AsDate:= Fecha1;
query1.Open;
form3.quickrep1.preview;
end;
Prueba, no se pierde nada.
Saludos