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

当设定packageRecord=30时lookup fields 部分不显示

尚未結案
lycnew
一般會員


發表:11
回覆:15
積分:5
註冊:2004-01-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-10-26 10:25:01 IP:61.142.xxx.xxx 未訂閱
三层数据,有表1,表2,表1有一字段是从表2查询的, 当设定表2.packageRecord=30时lookup fields 部分不显示,如图 请问各位大大,如何解快这个问题? 我目前是这样解决的: procedure TFrmMaterialList_in.DtlAfterScroll(DataSet: TDataSet); begin inherited; //物料资料表每次打开时返回30条记录,当Dtl找不到相关的关联名称时就自动从服务端下载相应记录到本地。 begin if dtl.FieldByName('matName').ASString='' then with dsCheck do begin close; commandtext:='select matid,matname,matmodel from sysitem_base where matid='+''''+dtl.FieldByName('matid').ASString+''''; open; if not (dsCheck.IsEmpty) then Sysitem_base.AppendData(dsCheck.Data,false); end; end; end;
pcplayer99
尊榮會員


發表:142
回覆:740
積分:591
註冊:2003-01-21

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-10-26 11:02:51 IP:219.133.xxx.xxx 未訂閱
你的办法不错啊。作为 Lookup 的对象,当然必须有数据否则会出错。 如果记录数并不多,干脆对 Lookup 对象做一次全拉进内存的操作好了。如果记录太多,用你的办法也是一个好办法。 照李维的说法,一次拉进来2000条记录是比较合适的。太多就会明显降低速度。
lycnew
一般會員


發表:11
回覆:15
積分:5
註冊:2004-01-14

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-10-26 12:50:12 IP:61.142.xxx.xxx 未訂閱
引言: 你的办法不错啊。作为 Lookup 的对象,当然必须有数据否则会出错。 如果记录数并不多,干脆对 Lookup 对象做一次全拉进内存的操作好了。如果记录太多,用你的办法也是一个好办法。 照李维的说法,一次拉进来2000条记录是比较合适的。太多就会明显降低速度。
记录太多了,几万条呢,如果一次下载到Client端,三层架构实在太慢了。上面我的方法是可以,但一个表有五六个lookup fields ,那么就得写五六次相似的代码,请问有什么更好的方法吗?
jieshu
版主


發表:41
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-10-26 18:33:20 IP:203.204.xxx.xxx 未訂閱
引言: ??太多了,几万?呢,如果一次下?到Client端,三?架构?在太慢了。上面我的方法是可以,但一?表有五六?lookup fields ,那么就得?五六次相似的代?,??有什么更好的方法??
用SQL Join的方式不就可以了嗎? <iFrame src="http://www.coss.com.tw/jieshu/sign.htm" width=400 height=105 scolling="NO" border="0"></iFrame> 震江系統(股)公司: http://www.coss.com.tw/ 捷舒軟體設計坊: http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
lycnew
一般會員


發表:11
回覆:15
積分:5
註冊:2004-01-14

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-10-29 08:15:49 IP:61.142.xxx.xxx 未訂閱
引言:
引言: ??太多了,几万?呢,如果一次下?到Client端,三?架构?在太慢了。上面我的方法是可以,但一?表有五六?lookup fields ,那么就得?五六次相似的代?,??有什么更好的方法??
用SQL Join的方式不就可以了嗎? <iFrame src="http://www.coss.com.tw/jieshu/sign.htm" width=400 height=105 scolling="NO" border="0"></iFrame> 震江系統(股)公司: http://www.coss.com.tw/ 捷舒軟體設計坊: http://www.coss.com.tw/jieshu/
jieshu,大大,您好,因为我这个form不是用于查询,而是用于编辑记录,如果用SQL Join的方式,在Table.applyupdates(-1)时,系统就不知更新那个表,所有我只能用 Lookup 的方法。 發表人 - lycnew 於 2004/10/29 08:18:20 發表人 - lycnew 於 2004/10/29 08:19:55
jieshu
版主


發表:41
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-10-29 16:21:41 IP:203.204.xxx.xxx 未訂閱
引言: jieshu,大大,您好,因?我??form不是用于查?,而是用于????,如果用SQL Join的方式,在Table.applyupdates(-1)?,系?就不知更新那?表,所有我只能用 Lookup 的方法。
我們是用BDE所以沒有這個問題, 用ADO好像也可以設某個欄位修改時不要更新, 不過我沒試過, 如果可以的話應該也沒問題, 他會判斷出有修改欄位的Table去Update. <iFrame src="http://www.coss.com.tw/jieshu/sign.htm" width=400 height=105 scolling="NO" border="0"></iFrame> 震江系統(股)公司: http://www.coss.com.tw/ 捷舒軟體設計坊: http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
pcplayer99
尊榮會員


發表:142
回覆:740
積分:591
註冊:2003-01-21

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-10-29 19:28:30 IP:218.17.xxx.xxx 未訂閱
几万条,一次拉过来不行,就多次拉。 用到的时候就拉。多拉几次,不就都过来了?以后就不用再拉了。 另外,如果里面的记录并不常变(零件的编号和名字的对照记录应该不会常变的),干脆拉过来后保存到本地,ClientDataSet.SaveToFile / LoadFromFile, 下次直接从本地直接把几万条装进来,就很快了。碰到新加进到库里的元件,本地没有的,再单独从服务器端拉过来。 总之,要想解决问题,只有自己多写几句话了。 而且,针对这个,你可以专门封装一个元件,比如继承 TClientDataSet,封装一个你自己的元件,就可以在很多地方用了。我就这样继承过TClientDataSet.
ddy
站務副站長


發表:262
回覆:2105
積分:1169
註冊:2002-07-13

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-10-30 00:16:13 IP:61.62.xxx.xxx 未訂閱
張貼程式碼請縮排,以利閱讀,小弟已協助修改,下次請您注意 詳細說明請參考本站規定 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19264    【公告】程式碼張貼規則與方法 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=57538    
lycnew
一般會員


發表:11
回覆:15
積分:5
註冊:2004-01-14

發送簡訊給我
#9 引用回覆 回覆 發表時間:2005-04-10 13:37:00 IP:61.142.xxx.xxx 未訂閱
请问阁下还有没有更好的方法?
Ktop_Robot
站務副站長


發表:0
回覆:3511
積分:0
註冊:2007-04-17

發送簡訊給我
#10 引用回覆 回覆 發表時間:2007-04-30 13:44:11 IP:000.000.xxx.xxx 未訂閱
提問者您好:


以上回應是否已得到滿意的答覆?


若已得到滿意的答覆,請在一週內結案,否則請在一週內回覆還有什麼未盡事宜,不然,
將由版主(尚無版主之區域將由副站長或站長)自由心證,選擇較合適之解答予以結案處理,
被選上之答題者同樣會有加分獎勵同時發問者將受到扣 1 分的處分。不便之處,請見諒。


有問有答有結案,才能有良性的互動,良好的討論環境需要大家共同維護,感謝您的配合。

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