自定义有几个条件:
1、把WINDOWS自定义纸张 长、宽设得大一点
2、在程序中设置QRP.PAGE.PAPERSIZE:=TQRPAPERSIZE(CUSTOM)
quickrep1.page.PaperSize:=TQRPaperSize(Custom);
quickrep1.page.LeftMargin:=LeftMargin;左边距
quickrep1.page.RightMargin:=RightMargin;右边距
quickrep1.page.TopMargin:=TopMargin;
quickrep1.page.BottomMargin:=BottomMargin;
设纸宽度PAPER.WIDTH 和LENGTH长度
quickrep1.Page.Length:=PaperLength;纸长度
quickrep1.Page.Width:=PaperWidth;纸宽度
再不行,请说话!!