[MartinS]

Antes que nada

Código Delphi [-]
    // Cambia
    qrfichapersonal.Query1.Params.ParamByName('nrodni').Value := strtofloat(dbtext1.Caption);
    // por
    qrfichapersonal.Query1.Params.ParamByName('nrodni').Value := strtoInt(dbtext1.Caption); // Creo que decias que NroDNI era entero

Deberias comprobar si la consulta arroja algun resultado en algun DbGrid o similar para ver si realmente hace lo que queres que haga. Otro punto importante es darle al QReport el Dataset, en tu caso Query1.
Algo mas sencillo a mi entender es que en vez de dar como parametro el contenido de una etiqueta deberias darle el valor del campo que estas buscando por ejemplo:

Código Delphi [-]
     // Suponiendo que Query2 es de una consulta de los clientes/Personal/Etc.-
    qrfichapersonal.Query1.Params.ParamByName('nrodni').Value := Query2.FieldByName('NroDoc').AsInteger;