Recent

« previous next »
Pages: [1]

Author Topic: Problem with TPageSetupDialog  (Read 682 times)

zamtmn

  • Hero Member
  • *****
  • Posts: 675
Problem with TPageSetupDialog
« on: October 28, 2022, 02:17:08 pm »
If I change page type in TPageSetupDialog this change only Printer.PaperSize.PaperName, but Printer.PageWidth,Printer.PageHeight remain the same and do not change. see Attached example
Quote
[PrinterSetupDlg.Execute] Printer "HP LaserJet 200 color M251 PCL 6", paper "A4"(4760x6815)
[PageSetupDlg.Execute] Printer "HP LaserJet 200 color M251 PCL 6", paper "A5"(4760x6815)
[PageSetupDlg.Execute] Printer "HP LaserJet 200 color M251 PCL 6", paper "A6"(4760x6815)
[PrinterSetupDlg.Execute] Printer "HP LaserJet 200 color M251 PCL 6", paper "A6"(2280x3296)
"A6"(4760x6815) - after PageSetupDlg.Execute it is wrong. "A6"(2280x3296) after PrinterSetupDlg.Execute it is good

I'm check on windows 11 x86-64. is it broken only for me, or can someone confirm?
Logged

wp

  • Hero Member
  • *****
  • Posts: 13269
Re: Problem with TPageSetupDialog
« Reply #1 on: October 28, 2022, 04:51:37 pm »
I can confirm it, Win-11, too. I transfered you project to Delphi, and Delphi does not show this -- it's not a Windows limitation.

Please submit a bug report, and add your project. (But note: the {$R *.res} in the project unit is malformed (missing '$'), and it took me some time to find out why the project could not be started due to error "740", "Failed to execute").
Logged
Pages: [1]
« previous next »
 

TinyPortal © 2005-2018