qreport问题 |
|
尚未結案
|
|
railgunman
初階會員   發表：59 回覆：121 積分：36 註冊：2003-03-31 發送簡訊給我 |
|
|
star
初階會員 發表：37 回覆：93 積分：36 註冊：2002-07-18 發送簡訊給我 |
Hi, 用QRCompositeReport試試看 procedure TForm1.QRCompositeReport1AddReports(Sender:TObject);
begin
with QRCompositeReport1.Reports do
begin
Add(QuickRep1);
Add(QuickRep1);
end;
end; procedure TForm1.btnPreviewClick(Sender:TObject);
begin
QRCompositeReport1.Preview;
end; 注意:在QuickRep1.SummaryBand1.AfterPrint中加上NewPage,第二份Preview的報表才會換頁.
|
|
star
初階會員 發表：37 回覆：93 積分：36 註冊：2002-07-18 發送簡訊給我 |
|
|
railgunman
初階會員 發表：59 回覆：121 積分：36 註冊：2003-03-31 發送簡訊給我 |
|
|
railgunman
初階會員 發表：59 回覆：121 積分：36 註冊：2003-03-31 發送簡訊給我 |
|
|
railgunman
初階會員 發表：59 回覆：121 積分：36 註冊：2003-03-31 發送簡訊給我 |
--------------------------------------------------------------------------------
Hi, 用QRCompositeReport試試看 procedure TForm1.QRCompositeReport1AddReports(Sender:TObject);
begin
with QRCompositeReport1.Reports do
begin
Add(QuickRep1);
Add(QuickRep1);
end;
end; procedure TForm1.btnPreviewClick(Sender:TObject);
begin
QRCompositeReport1.Preview;
end; 注意:在QuickRep1.SummaryBand1.AfterPrint中加上NewPage,第二份Preview的報表才會換頁.
———————————————————————————————————
请问一下具体是怎样一步一步的实现的？
QRCompositeReport1.Preview时看到的页数是几页呢？
|
|
railgunman
初階會員 發表：59 回覆：121 積分：36 註冊：2003-03-31 發送簡訊給我 |
|
|
star
初階會員 發表：37 回覆：93 積分：36 註冊：2002-07-18 發送簡訊給我 |
引言: Star兄： 注意:在QuickRep1.SummaryBand1.AfterPrint中加上NewPage,第二份Preview的報表才會換頁.----------------是什么意思呀？怎么实现呢？我按你说的方法做出来了，但没有加上上面那句代码，不知道加在什么地方。不过有一个大问题:QRCompositeReport1.Preview 时，所呈现的是两个QuickRep1的内容同时显示在报表上，并没有完成分页显示，怎样才能分页显示呢？ 急切期待各位的指点！！！！如同您所描述的:"并没有完成分页显示" 您必須在第一份的QuickRep1中加上一個SummaryBand, 在其AfterPrint的Event中寫上"NewPage;"的程式碼. 如此才可分頁顯示! 否則第二份報表會緊接在第一份報表後印出,不會分頁! |
|
star
初階會員 發表：37 回覆：93 積分：36 註冊：2002-07-18 發送簡訊給我 |
發表時間：2003-05-26 14:55:46
IP:211.162.xxx.xxx 未訂閱
系統時間：2024-05-07 17:44:42
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |