Hola debes enlazar tu query al dataset de tu reporte antes de hacer el preview.
Código Delphi
[-]
.............
FicCliente.querCliente.Open;
FicCliente.Titulo.text := 'Reporte de Cliente';
FicCliente.QuickRep1.DataSet:=FicCliente.querCliente;
If Salida.ItemIndex = 0 then FicCliente.QuickRep1.Preview
else if Salida.ItemIndex= 1 then FicCliente.QuickRep1.Print;
.............