program  Project1;

 uses 
  SysUtils, frxClass, frxDMPExport;

 var 
  aFRP: TfrxReport;
  aDOT: TfrxDotMatrixExport;
 begin 
   if  paramcount =  1   then 
       begin 
         try 
          aFRP := TfrxReport.Create( nil );
          aDOT := TfrxDotMatrixExport.Create( nil );
          aDOT.PageBreaks := false;
           if  aFRP.PreviewPages.LoadFromFile(ParamStr( 1 ))  then 
            aFRP.ShowPreparedReport;
         finally 
          aFRP.Free;
          aDOT.Free;
         end ;
       end ;
 end .