qreport列印時為何從最後頁印起? |
|
答題得分者是：chih
|
|
huangeider
高階會員   發表：288 回覆：492 積分：231 註冊：2003-02-26 發送簡訊給我 |
小弟用qreport作報表
有個問題是這樣的
有一個15個record的資料(第一筆到15筆的代號是1....15)
在報表上每頁要印8筆
預覽時很正常(第一頁8筆(代號1,2,3,4,5,6,7,8 筆二頁7筆代號9,10,11,12,13,14,15) 但按列印時卻印了三頁
而且是從後面開始印
第一頁6 筆印出的代號是10,11,12,13,14,15
第二頁8 筆印出的代號是2,3,4,5,6,7,8,9
第三頁1 筆印出的代號是1
請前輩幫忙 謝啦 「堅持」從洗馬桶做起
Aric
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
huangeider
高階會員 發表：288 回覆：492 積分：231 註冊：2003-02-26 發送簡訊給我 |
var k:integer;
...
procedure Thqueryprint.DetailBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin if ((k mod 8)=0) then
begin
quickrep1.NewPage;
k:=0;
end;
end; procedure Thqueryprint.DetailBand1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
begin
k:=k 1; end;
主要的程式如上
本來想問說是不是有改到什麼由最後一筆開始印的設定,
有這個功能嗎? 「堅持」從洗馬桶做起
Aric
|
|
chih
版主 發表：48 回覆：1186 積分：639 註冊：2002-04-02 發送簡訊給我 |
|
|
huangeider
高階會員 發表：288 回覆：492 積分：231 註冊：2003-02-26 發送簡訊給我 |
發表時間：2003-10-31 12:44:28
IP:210.201.xxx.xxx 未訂閱
系統時間：2024-05-06 4:18:43
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |