现在做一个界面让用户选择横向或纵向打印。
当用户选择横向打印的时候,页面是变成横向了,但数据区的内容却还是纵向的打印,造成一部分数据在页面以外,怎么解决?
:)
语句如下
uses Printers
  if i='横向' then
      QRep.Page.Orientation := poLandscape  //横向
      else
      QRep.Page.Orientation := poPortrait;   //纵向