|
|
@@ -1438,7 +1438,7 @@ procedure TReportsForm.ExportXlsReport(AStartPage, AEndPage: Integer;
|
|
|
// 康博士代码中写批量打印是，用Printer.Canvas，打印当前时，用PreviewBox.Canvas。不懂为什么
|
|
|
//APrintCom.OutputToExcelRangeXMLEx(PreviewBox.Canvas, AStartPage,
|
|
|
//AEndPage, GetTemplateXlsFileName, AFileName, Border, ExcelMode)
|
|
|
- APrintCom.OutputToExcelFileOE(PreviewBox.Canvas, AStartPage, AEndPage, GetTemplateXlsFileName, ExcelMode, Border)
|
|
|
+ APrintCom.OutputToExcelFileOE(PreviewBox.Canvas, AStartPage, AEndPage, GetTemplateXlsFileName, ExcelMode, Border, nil)
|
|
|
else
|
|
|
APrintCom.OutputToExcelFile(PreviewBox.Canvas, AStartPage,
|
|
|
AEndPage, GetTemplateXlsFileName, AFileName, ExcelMode, Border);
|
