Explorar o código

因SmartCost修改DirectPrintUnit单元,编译不通过,不在使用该单元

MaiXinRong %!s(int64=8) %!d(string=hai) anos
pai
achega
f7521a1814
Modificáronse 1 ficheiros con 2 adicións e 3 borrados
  1. 2 3
      Forms/ReportsFrm.pas

+ 2 - 3
Forms/ReportsFrm.pas

@@ -175,7 +175,7 @@ type
 implementation
 
 uses
-  UtilMethods, Math, DirectPrintUnit, Globals, ZhAPI, ReportAdjustFrm,
+  UtilMethods, Math, Globals, ZhAPI, ReportAdjustFrm,
   Contnrs, mEncryptUnit, Printers, WinSpool, MainFrm, ConstUnit,
   GclBillsGatherModel;
 
@@ -508,8 +508,7 @@ begin
     if Node.HasChildren or (Node.Checked <> csChecked) or (Node.Data = nil) then Continue;
     vTemplateNode := TTemplateNode(Node.Data);
     if FileExists(vTemplateNode.FileName) then
-      directPrintReport(PreviewBox.Canvas, vTemplateNode.FileName,
-          PreviewComXML, False, False, oemNormal,'','', IsExcel2010);
+      PrintReport(vTemplateNode, False, False, '', '');
   end;
   extvReport.ClearChecked;
 end;