在Delphi5下用ReportBulider5.5做的报表,之前用的是5.0做的可以直接将结果导出到Excel,Txt等,可如今不行了,请问为什么?应该如何做?

解决方案 »

  1.   

    据我所知,RB后来的版本要实现此功能的话,需要另一个第三方控件,好像是叫做TExtraDev吧,
      

  2.   

    现在已装上这个软件了,可还是实现不了该功能,代码如下。
    var myreport:TppReport;
    begin
     if savedialog1.execute then
     begin
       if (sender as tbutton).name='button1' then
         myreport:=ppreport1
       else myreport:=ppreport2;
       myreport.AllowPrintToFile := True;
       myreport.ShowPrintDialog :=False;
       myreport.TextFileName := SaveDialog1.FileName;
       myreport.DeviceType   := 'ExcelFile';
       myreport.Print;
       myreport.ShowPrintDialog :=True;
       myreport.AllowPrintToFile := False;
     end;
      

  3.   

    你先不要用代码,直接用RB的预览,点打印时看它的下面有没有可以输入为EXCEL格式的选项
      

  4.   

    你还要把此控件(RB页内)放到和你的ppreport同一个FORM上