[pacopenin]

Te pongo un ejemplo de como lo hago :

Código Delphi [-]

procedure TInformes.VerInforme(Informe, Registros, Tabla, Orden, Where : String; Grupo : Integer; Impresora : Boolean); 
var   cInf : String;   
  f_ini, f_fin : TDateTime;   
  Memo : TFrxMemoView; 
begin   
  cInf := curDir+'Data\Reports\'+Informe+'.fr3';    
  if FileExists(cInf) then   
   begin     
    frxInforme.LoadFromFile(cInf);      
    if ModoDemo then      
     aviso(buscaTraduccion('622'));      
    if Impresora then       
     frxInforme.Print     
    else      
     begin       
      frxPDFExport1.ShowDialog := True;       
      frxInforme.ShowReport;      
     end;   
   end; 
end;