[Petolansa]

Gracias a todos gente, ahi logre imprimir el qreport con la consulta. El codigo me quedo asi, reemplaze asignarle el text de un dbedit por el valor del campo de una tabla. Tambien cabie el tipo de variable de float a integer.

Código Delphi [-]
procedure TForm2.Button2Click(Sender: TObject);
begin
try
   if quickreport10.Query1.Active  then close;
    quickreport10:=tquickreport10.Create(self);
    quickreport10.Query1.Params.ParamByName('nrodni').Value := form2.Table1.FieldByName('pdni').Value ;
    strtoint(dbedit6.Text);
    quickreport10.Query1.Open;
    quickreport10.PreviewModal;
finally
    quickreport10.Free;
    end;
end;
end.

SAludos!