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

取得TQRExpr 的值

缺席
chi120
一般會員


發表:16
回覆:16
積分:6
註冊:2007-08-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-12-31 13:46:42 IP:61.221.xxx.xxx 訂閱
c16跟sum2 為TQRExpr
算出來裡面都有值
貼在BandType 為rbPageFooter 裡
抓不到c16及sum2的值
有人知道是為什麼嗎?


IF c16.Value.intResult <> 0 THEN
BEGIN
rate1 := c16.Value.intResult / sum2.Value.intResult * 100;
r1.Caption := Format('%1.1f',[rate1]);
END;
------
Aki..就算沒有明天
st33chen
尊榮會員


發表:15
回覆:591
積分:1201
註冊:2005-09-30

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-01-15 18:04:25 IP:122.116.xxx.xxx 訂閱
我好像有一次經驗 ( D6 )

beforeprint 的事件中有值,
一到 afterprint 的事件就沒有值,

我沒有再試, 請您試試看.
------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
christie
資深會員


發表:30
回覆:299
積分:475
註冊:2005-03-25

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-01-16 14:15:16 IP:203.73.xxx.xxx 未訂閱
試試
var rate1:double;
...
IF QRExpr1.Value.dblResult <> 0 THEN
BEGIN
rate1 := QRExpr1.Value.dblResult / QRExpr2.Value.dblResult * 100;
r1.Caption := Format('%.1f',[rate1]);
END;
===================引 用 chi120 文 章===================
c16跟sum2 為TQRExpr
算出來裡面都有值
貼在BandType 為rbPageFooter 裡
抓不到c16及sum2的值
有人知道是為什麼嗎?


IF c16.Value.intResult <> 0 THEN
BEGIN
rate1 := c16.Value.intResult / sum2.Value.intResult * 100;
r1.Caption := Format('%1.1f',[rate1]);
END;
------
What do we live for if not to make life less difficult for each other?
st33chen
尊榮會員


發表:15
回覆:591
積分:1201
註冊:2005-09-30

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-01-18 14:39:07 IP:122.116.xxx.xxx 訂閱
剛剛試過 ( 在 D6 環境)

qrband 的 beforeprint 可以取到 qrexpr 的值, 但 afterprint 就取不到值,

也就是說, 您要在 qrband 的 beforeprint 事件中將值存到變數中以便以後運用

不能在 afterprint 中處理.

建議您試試看

------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
系統時間:2024-04-19 22:17:53
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!