report sign online: export report(jpg & pdf), use ReportSize to replace PrintWidth & PrintHeight

Forms/SignOnlineReportsFrm.pas

@@ -1004,8 +1004,8 @@ procedure TSignOnlineReportsForm.ExportReports(const AFileName: string);
   begin
     img := TImage.Create(nil);
     try
-      img.Height := PreviewComXML.PrintHeight;
-      img.Width := PreviewComXML.PrintWidth;
+      img.Height := PreviewComXML.ReportSize.Y;
+      img.Width := PreviewComXML.ReportSize.X;
       PreviewComXML.PrintPreviewCanvas(APage, 0, img.Canvas, False);
       img.Picture.SaveToFile(APageFileName);
     finally
@@ -1135,8 +1135,8 @@ procedure TSignOnlineReportsForm.ExportPdfReports(const AFileName: string);
       imgEn.Visible := False;
       imgEn.Parent := Self;
       imgEn.IO.CreatePDFFile(APageFileName);
-      imgEn.Bitmap.Height := PreviewComXML.PrintHeight;
-      imgEn.Bitmap.Width := PreviewComXML.PrintWidth;
+      imgEn.Bitmap.Height := PreviewComXML.ReportSize.X;
+      imgEn.Bitmap.Width := PreviewComXML.ReportSize.Y;
       PreviewComXML.PrintPreviewCanvas(APage, 0, imgEn.Bitmap.Canvas, False);
       imgEn.IO.SaveToPDF;
     finally