With QryLibroDiario do
Begin
Sql.Clear;
Sql.LoadFromFile(Path);
QryLibroDiario.Parameters.ParamByName('Primer').Value := Primer;
QryLibroDiario.Parameters.ParamByName('Ultimo').Value := Ultimo;
QryLibroDiario.Parameters.ParamByName('cNiv').Value := cNiv;
Open;
End;