Imprimir registros de una fecha actual

[[Caral]]

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