N northwindrocker Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-09 #1 如题！一般打印都是A4纸纵向大，现在想横着大怎么实现！
J jianguobu Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-09 #4 page的orientation属性设为polandscape就是横向打印了.
W windpray Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-10 #5 { 纸张大小 pgSize A2 420*954 mm 66 A3 297*420 mm 8 A4 210*297 mm 9 A5 148*210 mm 11 B4 250*354 mm 12 B5 182*257 mm 13 } var Page: TfrPage; begin tfrReport.Pages.Clear; tfrReport.Pages.Add; //建立打印页 Page := tfrPay.Pages[0]; Page.ChangePaper(9, page.pgWidth , page.pgHeight, page.pgBin, poLandscape); //设成A4横项 end; 以上是动设!在uses中加入printers这个文件!
{ 纸张大小 pgSize A2 420*954 mm 66 A3 297*420 mm 8 A4 210*297 mm 9 A5 148*210 mm 11 B4 250*354 mm 12 B5 182*257 mm 13 } var Page: TfrPage; begin tfrReport.Pages.Clear; tfrReport.Pages.Add; //建立打印页 Page := tfrPay.Pages[0]; Page.ChangePaper(9, page.pgWidth , page.pgHeight, page.pgBin, poLandscape); //设成A4横项 end; 以上是动设!在uses中加入printers这个文件!
