在rave中，我怎么才能收到form 内传给的参数！！sos!!! |
|
尚未結案
|
|
lixiao
一般會員   發表：8 回覆：3 積分：2 註冊：2003-12-20 發送簡訊給我 |
我在from中
procedure Tfmplan.SpeedButton16Click(Sender: TObject);
var
s,d,mysql:string;
begin
edit7.Text:= fmdm.Query1.Text;
s:= ' P_bazu="' combobox2.text '" and ';
d:= trim(fmdm.Query1.Text);
insert(s,d,27 );
fmdm.Query1.DisableControls;
fmdm.Query1.SQL.Clear ;
fmdm.Query1.SQL.Add(d);
fmdm.Query1.ExecSQL ;
fmdm.Query1.UnPrepare ;
fmdm.Query1.EnableControls;
With fmdm.RvProject1 do begin
Open;
SetParam('checkif',combobox2.text);
ExecuteReport('Report1');
Close;
end;
end;
我要在RAVE中要收到我在FORM中传给我的 Tfmplan.combobox2.text 的值，在RVAE中，我要怎么处理！谢谢！！！！！
|
|
cmj
高階會員  發表：15 回覆：242 積分：226 註冊：2002-06-12 發送簡訊給我 |
引言: 我在from中 procedure Tfmplan.SpeedButton16Click(Sender: TObject); var s,d,mysql:string; RvDataView: TRaveBaseDataView; begin edit7.Text:= fmdm.Query1.Text; s:= ' P_bazu="' combobox2.text '" and '; d:= trim(fmdm.Query1.Text); insert(s,d,27 ); fmdm.Query1.DisableControls; fmdm.Query1.SQL.Clear ; fmdm.Query1.SQL.Add(d); fmdm.Query1.ExecSQL ; fmdm.Query1.UnPrepare ; fmdm.Query1.EnableControls; With fmdm.RvProject1 do begin Open; //SetParam('checkif',combobox2.text); RvDataSetConnection1.DataSet:=fmdm.Query1; RvDataView:=TRaveBaseDataView(RvProject.ProjMan.FindRaveComponent('DataView1',Nil)); CreateFields(RvDataView, nil, nil, true); // refresh the dataview RvProject.Execute; // ExecuteReport('Report1'); Close; end; end; 我要在RAVE中要收到我在FORM中传给我的 Tfmplan.combobox2.text 的值，在RVAE中，我要怎么处理！谢谢！！！！！ 建議不要在Rave Report內做抓資料庫動作,應先在外部先抓好資料, 若有編譯錯誤參考加入下列單元 RpCon, RpConDS, RpBase, RpSystem, RpDefine, RpRave, RpDevice, RvClass, RvCsData, RvCsDraw, RvCsStd, RvCsRpt, RvData, RvDefine, RvDirectDataView, RvUtil,RVProj |
|
Fishman
尊榮會員  發表：120 回覆：1949 積分：2163 註冊：2006-10-28 發送簡訊給我 |
Hi: 在 RAVE Report 中，
點選到 Report，在 Parameters 中，建立一個 Checkif 的 Parameters，
拉一個 DataText Component(在 Report 的 TAB 中)，在 DataField 的設定中，用選的或自行打上 Param.Checkif
如此報表即可列印出 combobox2.text
------
Fishman |
|
lixiao
一般會員 發表：8 回覆：3 積分：2 註冊：2003-12-20 發送簡訊給我 |
|
|
hahalin
版主  發表：295 回覆：1698 積分：823 註冊：2002-04-14 發送簡訊給我 |
發表時間：2003-12-22 10:28:31
IP:220.168.xxx.xxx 未訂閱
系統時間：2024-05-17 1:59:20
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |