浏览代码

Report, export xlsx, narrow

MaiXinRong 7 年之前
父节点
当前提交
18a6ff5193
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      Forms/ReportsFrm.pas

+ 1 - 1
Forms/ReportsFrm.pas

@@ -772,7 +772,7 @@ begin
       end;
       end;
     end else
     end else
     begin
     begin
-      if (DrawType = 3) or (DrawType = 5) then
+      if (DrawType = DRAW_TYPE_EXCEL_XML) or (DrawType = DRAW_TYPE_EXCEL) or (DrawType = DRAW_TYPE_EXCEL_OE) then
       begin
       begin
         contentFontRec.FontHeight := Round(ReportConfig.ContentFont.Size*4/3);
         contentFontRec.FontHeight := Round(ReportConfig.ContentFont.Size*4/3);
       end else if (isPrinting) then
       end else if (isPrinting) then