Minimum margins
ekzakt
FRANCE
Hello,
I'm trying to retreive minimum margins for the currently selected printer. FastReport defaults to 1cm, but many printers need a higher bottom margin. I would like the margin to be set automatically to the smallest printable value. Is it possible, or must users configure their settings manually ?
I'm trying to retreive minimum margins for the currently selected printer. FastReport defaults to 1cm, but many printers need a higher bottom margin. I would like the margin to be set automatically to the smallest printable value. Is it possible, or must users configure their settings manually ?
Comments
procedure TfrxReportPage.SetDefaults;
begin
FLeftMargin := frxPrinters.Printer.LeftMargin;
FRightMargin := frxPrinters.Printer.RightMargin;
FTopMargin := frxPrinters.Printer.TopMargin;
FBottomMargin := frxPrinters.Printer.BottomMargin;
FPaperSize := frxPrinters.Printer.DefPaper;
FPaperWidth := frxPrinters.Printer.DefPaperWidth;
FPaperHeight := frxPrinters.Printer.DefPaperHeight;
FOrientation := frxPrinters.Printer.DefOrientation;
UpdateDimensions;
end;