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

如何將FastReport中的qry的資料傳參數到另一個qry

答題得分者是:P.D.
energybody
一般會員


發表:44
回覆:32
積分:15
註冊:2007-04-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-11-28 12:11:57 IP:211.21.xxx.xxx 訂閱
小弟的程式是如下寫的, 其中 qryM 是一個 master query,  qryTmpHBLFrt 是一個 detail query, 要引用 qryM 的 hblkey 及 payer, Fast Report 有指令可以設定, 但是 qryM 的資料要如何傳給 qryTmpHBLFrt, 或是有其他的方法,小弟不會用,請各位大大幫忙, 謝謝.

procedure TrptSEDebitNote.frxRptBeforePrint(Sender: TfrxReportComponent);
var pQuery: TfrxADOquery;
pMemo: TfrxMemoView;
begin
if Sender is TfrxADOquery then
begin
pQuery:=TfrxADOquery(sender);
if pQuery.Name='qryM' then <--master query
begin
pQuery.Close;
pQuery.SQL.Text:='select job,hbl,hblkey,payer,checked from TmpPickHBL where checked=''Y'' order by hblkey';
pQuery.Open;
end;
if pQuery.Name='qryTmpHBLFrt' then //¤£¯à¨Ï¥Î,¥i¯à©M¶Ç°Ñ¼Æ¦³Ãö(:hblkey, :payer) <--detail query
begin
pQuery.Close;
pQuery.SQL.Text:='select * from TmpHBLFrt where hblkey=:bhlkey and payer=:payer and checked=''Y'' and ppcc=''P'' order by seq';
pQuery.ParamByName('hblkey').Value:=??????? <如何將qryM 的資料傳給 qryTmpHBLFrt或有其他的方法
pQuery.Open;
end;
end;
P.D.
版主


發表:571
回覆:3880
積分:3666
註冊:2006-10-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-11-28 18:54:08 IP:61.67.xxx.xxx 未訂閱
建議在Delphi中, 要列印FR之前先寫好 Master 與 Detail的連結, 一般都是做在 Master 的 onAfterScroll 事件上, 然後只要在 FR中設定MasterBand 與 DetailBand 即可(但你在Delphi中要設定兩組 frDataset對應Master 與Detail)
energybody
一般會員


發表:44
回覆:32
積分:15
註冊:2007-04-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-11-30 17:50:51 IP:211.21.xxx.xxx 訂閱
小弟是用 FastReport 3.2 版, 找不到  Master 的 onAfterScroll 事件, 如果要在Delphi中要設定兩組 frDataset對應Master 與Detail, 請問如何設定, 如何寫程式, 小弟是 FastReport 的初學者, 能否請版主寫詳細一點, 謝謝.
===================引 用 P.D. 文 章===================
建議在Delphi中, 要列印FR之前先寫好 Master 與 Detail的連結, 一般都是做在 Master 的 onAfterScroll 事件上, 然後只要在 FR中設定MasterBand 與 DetailBand 即可(但你在Delphi中要設定兩組 frDataset對應Master 與Detail)
P.D.
版主


發表:571
回覆:3880
積分:3666
註冊:2006-10-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-12-01 23:50:17 IP:61.67.xxx.xxx 未訂閱
我不是要你在fr中做, 是在Delphi中, 假設query1->master, query2->detail
則在query1.onafterscroll 中寫對 query2 的篩選sql條件, 這樣在fr 中 master 記錄指標移動, query2 就會觸發 query1的afterscroll, 即可以達到master-detail 的連結了
系統時間:2017-10-23 8:56:08
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!