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

fastreport合計?

尚未結案
bear28
一般會員


發表:44
回覆:53
積分:19
註冊:2002-09-10

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-07-17 04:48:37 IP:211.22.xxx.xxx 未訂閱
請問 若在MasterData_band其中一個memo要使用到footer_band其中一個memo(此值為一合計值)的值來做計算,要如何做? 謝
oktony
中階會員


發表:67
回覆:132
積分:64
註冊:2004-12-05

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-07-18 21:17:27 IP:218.5.xxx.xxx 未訂閱
引言: 請問 若在MasterData_band其中一個memo要使用到footer_band其中一個memo(此值為一合計值)的值來做計算,要如何做? 謝
您好,您應該可以在page的OnBeforePrint事件裏面直接讀取footer_band和MasterData_band的值進行計算。
bear28
一般會員


發表:44
回覆:53
積分:19
註冊:2002-09-10

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-07-19 04:44:35 IP:211.22.xxx.xxx 未訂閱
謝謝oktony 但我是的結果不行,可否在指教... code: procedure Page1OnBeforePrint(Sender: TfrxComponent); begin memo1.clear; memo1.text:=memo2.text; //memo1是MasterData_band,memo2是footer_band end; 但預覽的結果memo1無值...
oktony
中階會員


發表:67
回覆:132
積分:64
註冊:2004-12-05

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-07-19 14:00:38 IP:220.161.xxx.xxx 未訂閱
您好!試試看 memo1.memo.text:=memo2.memo.text;
bear28
一般會員


發表:44
回覆:53
積分:19
註冊:2002-09-10

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-07-19 21:43:07 IP:211.22.xxx.xxx 未訂閱
謝謝oktony兄 結果還是不行,可否再指教... code: procedure Page1OnBeforePrint(Sender: TfrxComponent); begin memo1.clear; memo1.memo.text:=memo2.memo.text; //memo1是MasterData_band,memo2是footer_band end; 但預覽的結果memo1還是無值...
bear28
一般會員


發表:44
回覆:53
積分:19
註冊:2002-09-10

發送簡訊給我
#6 引用回覆 回覆 發表時間:2005-07-19 22:09:47 IP:211.22.xxx.xxx 未訂閱
我是另一種方式,確有錯誤訊息:could convert variant of type (Array Variant) into type (Integer) procedure Page1OnBeforePrint(Sender: TfrxComponent); begin memo1.clear; memo1.memo.text:=inttostr([COUNT(MasterData1)]); //memo1是MasterData end;
oktony
中階會員


發表:67
回覆:132
積分:64
註冊:2004-12-05

發送簡訊給我
#7 引用回覆 回覆 發表時間:2005-07-19 22:34:41 IP:222.78.xxx.xxx 未訂閱
您試試用vartostr([COUNT(MasterData1)]); 看看行不行。
bear28
一般會員


發表:44
回覆:53
積分:19
註冊:2002-09-10

發送簡訊給我
#8 引用回覆 回覆 發表時間:2005-07-19 23:45:14 IP:211.22.xxx.xxx 未訂閱
var cts : integer; procedure GroupFooter1OnBeforePrint(Sender: TfrxComponent); begin cts:=COUNT(MasterData1); end; procedure GroupHeader1OnBeforePrint(Sender: TfrxComponent); begin memo5.clear; memo5.memo.text:=vartostr(cts); end; 以上的Code可以執行,但結果是最後一張報表的筆數跑到第一張,第一張報表的筆數跑到第二張,以此類推..不知哪發生錯誤?
系統時間:2024-04-29 19:53:32
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!