全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1801
推到 Plurk!
推到 Facebook!

如何控制qreport的group換頁

缺席
cswang1210
一般會員


發表:46
回覆:42
積分:17
註冊:2005-01-06

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-11-24 08:38:10 IP:220.130.xxx.xxx 訂閱
各位大大:
小弟最近設計一個報表....使用group的band將detail包起來...
user希望同一個group的資料若無法在同一頁印完,就移往下一頁印....
我本來使用定位的方式,來控制group的換頁...但後來發現不可行...
因為每一個group的資料筆數是不固定的,所以很難保證資料都會依照我的需求換頁,
所以麻煩各位先進幫小弟想想辦法....謝謝!

以下是我的方法....


[code delphi]
procedure TSFC120R1.QRGroup1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
inherited;
if QuickRep1.CurrentY > 2200 then
begin
QuickRep1.NewPage;
end;
end;
[/code]

cyben
一般會員


發表:1
回覆:3
積分:0
註冊:2003-03-06

發送簡訊給我
#2 引用回覆 回覆 發表時間:2010-01-25 16:12:05 IP:122.116.xxx.xxx 訂閱
先在暫存檔上把每個GROUP的資料依每頁可印的筆數補成相同筆數,不足的補空白,然後勾取 QRGRoup1.ForceNewPage 就會自動分頁了
系統時間:2017-10-18 11:54:00
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!