怎么使FastReport直接打印（在线等）

Question

如题，我不想他调出预览直接打印出来

Answer 1

DataModule1.frReport1.LoadFromFile('话单报表.frf');
      if mainForm.CDS_callturn.RecordCount>0 then
      with TPVform.Create(self) do
      begin
        DataModule1.frReport1.Preview := frPreview1;
        if DataModule1.frReport1.PrepareReport then
        begin
          DataModule1.frReport1.ShowPreparedReport;
          frPreview1.Print;
          free;
        end;
      end;