Saludos.
una posible sobucion es crear un procedure dentro del formulario del reporte mas o menos asi :
procedure Tform1.LoadRpt(Const Fecha:TDate;aPrint:boolean=false);
Const
aConsulta = 'Select * From Cliente Where fecha = "%s" ';
begin
With MiQuery do begin
Close;
Sql.Add(format(aConsulta,[formatdatetime('mm/dd/yyyy',Fecha)]));
open;
if ismpty then begin
Close;
Showmessage('Registro no encontrado...');
exit;
end;
if aprint then
quickrpt.print
else quickrpt.preview;
//--[Suerte espero aberte ayudado...
]--
end;
end;