[marcoszorrilla]

No he hecho la prueba pero mira a ver cambiando a Txt si te funciona este código:

Código Delphi [-]
 var Dialogo: TOpenDialog;
 begin
   with TQRPHandler.Create do
     try
       Dialogo:= tOpenDialog.Create(Application);
       Dialogo.Filter:='Archivo QuickReport|*.QRP';
       if (Dialogo.Execute) then Filename := Dialogo.Filename;
       Dialogo.free;
       Preview;
     finally
       Free;
     end;
 end;

Un Saludo.