可根据不同的打印机进行调整?
谢谢!

解决方案 »

  1.   

    fr预览窗口中有一个pagesetupbtn,可以打开一个页边距对话框,但设置后不起作用,怎么回事?
      

  2.   

    可以啊;你可设计报表时加在里面加一个窗体,放入四个广西框和一个按钮,按钮的ModalResult设为mrOk,然后在里面写入代码:
      page1.StretchToPrintable := true;
      page1.LeftMargin := Edit1.Text;
      page1.TopMargin := Edit2.Text;
      page1.RightMargin := Edit3.Text;
      page1.BottomMargin := Edit4.Text;
    或者不用设ModalResult为mrOk在代码中写入ModalResult := mrOk是一样的;
    若不用其本身窗体而在Delphi中写,你改Page1为frReport1.Pages[0]试试应该是一样