|
@@ -773,6 +773,10 @@ procedure TReportsForm.InitPageSettings;
|
|
|
begin
|
|
|
// ÉèÖÃÒ³Ãæ´óС
|
|
|
PreviewComXML.setPageSize(ReportConfig.PageSize);
|
|
|
+ if ReportConfig.PageSize = 'A3' then
|
|
|
+ PreviewComXML.PrintPageSizeIdx := DMPAPER_A3
|
|
|
+ else if ReportConfig.PageSize = 'A4' then
|
|
|
+ PreviewComXML.PrintPageSizeIdx := DMPAPER_A4;
|
|
|
// ÉèÖñ߾à
|
|
|
PreviewComXML.setEdge(0, '', ReportConfig.LeftEdge/10);
|
|
|
PreviewComXML.setEdge(1, '', ReportConfig.RightEdge/10);
|