線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1379
推到 Plurk!
推到 Facebook!

報表中如何使欄位只秀一次

答題得分者是:careychen
darkblackword
一般會員


發表:3
回覆:7
積分:2
註冊:2008-10-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-10-24 14:13:48 IP:220.130.xxx.xxx 訂閱
各位大大您好~
我希望我的報表欄位(CRNCY)只出現一次..但我不知道該從哪裡下手~~
在哪寫程式...還有要下什麼指令...

[code delphi]
var
TSTM001QRP: TTSTM001QRP;
implementation
uses SWDBDM;
{$R *.DFM}
procedure TTSTM001QRP.QRBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
IF REPSQLOP_CD_NO.Value = '0' THEN
QRLabel6.Caption :='未上市/上櫃';
IF REPSQLOP_CD_NO.Value = '1' THEN
QRLabel6.Caption :='上市';
IF REPSQLOP_CD_NO.Value = '2' THEN
QRLabel6.Caption :='上櫃';
end;
procedure TTSTM001QRP.QRBand2BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
QRLabel5.Caption := REPSQLCRNCY.Value ' 小計';
end;
procedure TTSTM001QRP.QuickRepBeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
Company_NameLB.caption := SWDM.DataBase.Company_Cname;
UserLB.caption := '印表者 :' SWDM.DataBase.CName;
end;
procedure TTSTM001QRP.Company_NameLBPrint(sender: TObject;
var Value: String);
begin
VALUE := '股份有限公司';
end;
procedure TTSTM001QRP.Report_NameLBPrint(sender: TObject;
var Value: String);
begin
VALUE :='債卷代碼資料';
end;
end.
[/code]
編輯記錄
taishyang 重新編輯於 2008-10-24 15:27:26, 註解 無‧
darkblackword 重新編輯於 2008-10-29 21:21:16, 註解 無‧
careychen
尊榮會員


發表:41
回覆:580
積分:959
註冊:2004-03-03

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-10-24 21:11:22 IP:59.126.xxx.xxx 訂閱
hi,您的問題其實讓人看不大懂,建議您描述一下您現在在 QuickRep 中的 Band 結構描述,
例如:

PageHeader
GroupHeader
Child
GroupFooter
PageFooter

而是否有什麼 Band 是自行讀取 DataSet 而不是用 QuickRep 的 Dataset 之類,那比較好幫您解決問題
------
價值的展現,來自於你用哪一個角度來看待它!!
darkblackword
一般會員


發表:3
回覆:7
積分:2
註冊:2008-10-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-10-27 11:30:19 IP:220.130.xxx.xxx 訂閱
謝謝大大我已找到答案~~

我的主要問題是:主要報表的標題(不是表頭)只出現一次就好!
目前程式已修改好了,謝謝!!
Coffee
版主


發表:31
回覆:878
積分:561
註冊:2006-11-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-10-27 13:36:34 IP:59.124.xxx.xxx 訂閱
問題已解決仍請將原問題(標題/內容)描述清楚,若未涉機密亦請分享答案,以便其它人若有類似問題可以查詢。

===================引 用 darkblackword 文 章===================
謝謝大大我已找到答案~~

我的主要問題是:主要報表的標題(不是表頭)只出現一次就好!
目前程式已修改好了,謝謝!!
------
不論是否我發的文,在能力範圍皆很樂意為大家回答問題。
為了補我的能力不足之處,以及讓答案可以被重複的使用,希望大家能儘量以公開的方式問問題。
在引述到我的文時自然會儘量替各位想辦法,謝謝大家!
darkblackword
一般會員


發表:3
回覆:7
積分:2
註冊:2008-10-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2008-10-29 21:48:33 IP:61.229.xxx.xxx 訂閱
解決的方法:

[beforprint 裡]
aa := MasterSQL.FieldByName('欄位').Asstring;
aa:= '';

(這樣就可以達到欄位只出現一次)

系統時間:2024-04-23 23:27:48
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!