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

請問QReport如何顯示單頁中未滿筆數的Detail(顯示空列)?

答題得分者是:zong
asupeduer
初階會員


發表:36
回覆:49
積分:27
註冊:2002-11-08

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-12-21 17:04:04 IP:210.244.xxx.xxx 未訂閱
在使用QuickReport時,如果Details裡面只有一兩筆, 但是報表的頁面中,滿頁的筆數是十筆, 如何顯示空著的八筆或九筆呢? 這樣在制式報表上應該是比較合理吧? 但如何做呢?或只要簡單的設定即可? -- 另外一個小問題一問︰ 如何顯示某份報表的總頁數(共?頁),如何表示呢? //------------------------------------------------ 我常在想,寫程式跟爬格子到底有什麼不同呢??????????? //------------------------------------------------ 發表人 - asupeduer 於 2002/12/21 17:11:56
------
//------------------------------------------------
我常在想,寫程式跟爬格子到底有什麼不同呢???????????
//------------------------------------------------
zong
初階會員


發表:11
回覆:51
積分:42
註冊:2002-08-18

發送簡訊給我
#2 引用回覆 回覆 發表時間:2002-12-22 00:12:55 IP:61.219.xxx.xxx 未訂閱
引言: 在使用QuickReport時,如果Details裡面只有一兩筆, 但是報表的頁面中,滿頁的筆數是十筆, 如何顯示空著的八筆或九筆呢? 這樣在制式報表上應該是比較合理吧? 但如何做呢?或只要簡單的設定即可? -- 另外一個小問題一問︰ 如何顯示某份報表的總頁數(共?頁),如何表示呢?
我都用笨方法!就是把表格整個畫在QuickRep 上! Details 只放資料列! 這樣就好了! 總頁數: QrLabel1.Caption:= Format('第 %d 頁; 共 %d 頁',[PageNumber, PagesCount]);
zong
初階會員


發表:11
回覆:51
積分:42
註冊:2002-08-18

發送簡訊給我
#3 引用回覆 回覆 發表時間:2002-12-22 00:25:33 IP:61.219.xxx.xxx 未訂閱
引言: 總頁數: QrLabel1.Caption:= Format('第 %d 頁; 共 %d 頁',[PageNumber, PagesCount]);
少打了一些! Application.CreateForm(TQuickReport2,QuickReport2) ; QuickReport2.Prepare ; //一定要加這列,但資料量大時!就不好玩了! //因為它先run過一次報表了! 算總頁數 QuickReport2.Preview ; QuickReport2.Free ;
asupeduer
初階會員


發表:36
回覆:49
積分:27
註冊:2002-11-08

發送簡訊給我
#4 引用回覆 回覆 發表時間:2002-12-23 00:36:05 IP:61.13.xxx.xxx 未訂閱
/* 我都用笨方法!就是把表格整個畫在QuickRep 上! Details 只放資料列! 這樣就好了! */ 抱歉,不懂耶,什麼是把整個報表畫在QREP上? 不是要有表頭,頁首,中間放Details,最後面才放頁尾嗎? 能否麻煩您貼個畫面呢?真抱歉說,因為還是不懂您的意思說... /* Application.CreateForm(TQuickReport2,QuickReport2) ; QuickReport2.Prepare ; //一定要加這列,但資料量大時!就不好玩了! //因為它先run過一次報表了! 算總頁數 QuickReport2.Preview ; QuickReport2.Free ; */ 這是算總頁數的方法嗎?先行算過才能引用PagesCount麼? 謝謝您了。 //------------------------------------------------ 我常在想,寫程式跟爬格子到底有什麼不同呢??????????? //------------------------------------------------
------
//------------------------------------------------
我常在想,寫程式跟爬格子到底有什麼不同呢???????????
//------------------------------------------------
zong
初階會員


發表:11
回覆:51
積分:42
註冊:2002-08-18

發送簡訊給我
#5 引用回覆 回覆 發表時間:2002-12-23 12:07:16 IP:61.219.xxx.xxx 未訂閱
QuickReport 一定要先run 一次才知道總頁數的! 它就是這樣! 目前我還沒有看過別的方法! 不然你就以資料筆數自己先算有幾頁了! <=有時會不準,因為page大小有其他因素! 表格整個畫在QuickRep : 你要先畫表格! 再放 表頭,頁首,中間放Details 都一樣 只是格子畫在QuickRep1上 ,所以要先預留表頭! 若不懂我再MAIL SAMPLE 給你!
熾冰
一般會員


發表:29
回覆:21
積分:10
註冊:2004-01-12

發送簡訊給我
#6 引用回覆 回覆 發表時間:2010-11-17 17:26:06 IP:220.130.xxx.xxx 訂閱
Application.CreateForm(TQuickReport2,QuickReport2) ;
QuickReport2.Prepare ; //一定要加這列,但資料量大時!就不好玩了!
//因為它先run過一次報表了! 算總頁數
QuickReport2.Preview ;
QuickReport2.Free ;


QrLabel1.Caption:= Format('第 %d 頁; 共 %d 頁',[PageNumber, PagesCount]);

的關係其實是
先宣告一個全域變數 PagesCount

當 QuickReport2.Prepare ; 執行完畢後
將 PageNumber的值 寫進 PagesCount
這樣就可以取得總頁數
系統時間:2024-05-20 18:30:01
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!