QuickRep控件换页问题（100分）(100分)

[red][/red][black][/black]我用QuickRep控件进行打印，不连数据库，直接用很多QRlabel控件来显示数据，问题是：
如果QRlabel控件过多需要换页打印时，我怎么实现，即使我把很后面的QRlabel控件的位置
调到超过一页，预览时老是只有一页，控件位置超过一页的就看不到了，希望各位大侠指点指点。

qr.newcolumn
可以實現換頁

设置一个变量A
在detailband的beforprint事件中A:=A+1;
在detailband的Afterprint事件中判断if A>规定行数 then
quickrep.NewPage

同意楼上

quickreport换页有好多问题，上次我们用自定义纸张，qreport总是不能正常换页，
后来换了report builder7.02，啊，真是好用啊[][][8D][]
强烈建议你改用report builder!

看來樓主是睡著了[][]

leafleter 那里可以下载 report builder

{------------------------------------------------------}
{
功能：对一个Pascal字符串进行定长换行处理
入口参数：Value -- 要转换的Pascal字符串, max_len_line -- 每行Unicode字符个数。
返回结果：转换后的字符串。
}
function wrap_line(Value: String;
max_len_line: integer ): String;
var
ws: WideString;
s: string;
begin
ws:= Value;
s:= '';
while length(ws) > MAX_LEN_LINEdo
begin
s:= s + Copy(ws, 1, MAX_LEN_LINE) + #13;
delete(ws, 1, MAX_LEN_LINE);
end;

Result:= s + ws;
end;

procedure TForm2.QRDBText2Print(sender: TObject;
var Value: String);
begin
wrap_line(Value, 5);
end;

//要不设置横向打印！双击QuickReport选择LandScape

http://www.51delphi.com