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

关于添加cds的文件

缺席
terry_zhou82
一般會員


發表:8
回覆:22
積分:6
註冊:2012-08-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2012-09-13 12:37:38 IP:116.239.xxx.xxx 訂閱
在设置好loadfromfile之后,我吧clientdataset2里面的内容添加到clientdataset1的文件末尾,执行成功,但是有个问题,这个时候在dbgrid的左边会有2个箭头,而且我用鼠标滚轮选数据的时候,只有选到未添加时候的最后一条,一定要重新点击旁边的滚动条,才可以选择。这个是什么问题啊。请大大们指教

[code delphi]
ClientDataSet1.Edit ;
clientdataset2:=Tclientdataset.create(self);
ClientDataSet2.LoadFromFile('d:\update.cds');
ClientDataSet2.Edit ;
ClientDataSet1.AppendData(ClientDataSet2.Data,true);
ClientDataSet1.ApplyUpdates(-1);
ClientDataSet1.SaveToFile(extrafilename(application.exename) '\rd.cds');
ClientDataSet1.Open ;
DeleteFile('c:\update.cds');
[/code]
sryang
尊榮會員


發表:39
回覆:762
積分:920
註冊:2002-06-27

發送簡訊給我
#2 引用回覆 回覆 發表時間:2012-09-13 13:02:14 IP:114.35.xxx.xxx 訂閱
建議您仔細的研讀這一篇文章
A Guide to Using the TClientDataSet in Delphi applications
------
歡迎參訪 "腦殘賤貓的備忘錄" http://maolaoda.blogspot.com/
terry_zhou82
一般會員


發表:8
回覆:22
積分:6
註冊:2012-08-28

發送簡訊給我
#3 引用回覆 回覆 發表時間:2012-09-14 13:25:39 IP:116.239.xxx.xxx 訂閱
搞定了。呵呵。
sryang
尊榮會員


發表:39
回覆:762
積分:920
註冊:2002-06-27

發送簡訊給我
#4 引用回覆 回覆 發表時間:2012-09-14 13:31:22 IP:114.35.xxx.xxx 訂閱
是否可分享是如何搞定的?感謝您!
------
歡迎參訪 "腦殘賤貓的備忘錄" http://maolaoda.blogspot.com/
terry_zhou82
一般會員


發表:8
回覆:22
積分:6
註冊:2012-08-28

發送簡訊給我
#5 引用回覆 回覆 發表時間:2012-09-14 13:47:12 IP:116.239.xxx.xxx 訂閱
 就加了一句清空缓存的命令
ClientDataSet1.MergeChangeLog ;
sryang
尊榮會員


發表:39
回覆:762
積分:920
註冊:2002-06-27

發送簡訊給我
#6 引用回覆 回覆 發表時間:2012-09-14 14:19:02 IP:114.35.xxx.xxx 訂閱
也可以先 ClientDataSet1.LogChanges := False;
然後再 AppendData,這樣就不會產生 Delta
最後再 ClientDataSet1.LogChanges := True;

而 MergeChangeLog 就是清除 Delta

===================引 用 terry_zhou82 文 章===================
就加了一句清空缓存的命令
ClientDataSet1.MergeChangeLog ;
------
歡迎參訪 "腦殘賤貓的備忘錄" http://maolaoda.blogspot.com/
系統時間:2024-11-21 19:50:26
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!