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

怎样用DataModule里的ClientDataSet的资料控制当前Form的Image?

尚未結案
xxiaowang
中階會員


發表:51
回覆:75
積分:55
註冊:2005-01-26

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-05-07 10:39:00 IP:218.17.xxx.xxx 未訂閱
请教各位大大,我用的是delphi7 sqlserver, 我将ClientDataSet放置在DataModule中,并连接资料库。另外Form1中放置datasource及DBGrid,连接到DataModule中的ClientDataSet。Form1还有控件Image1,我想根据ClientDataSet的当前资料的内容来控制Image1的Visible,所以这个动作的代码写在ClientDataSet的AfterScroll中。 可是,当我编译运行时会出现Access violation错误,因为AfterScroll中会使用:Form1.Image1.visible:=.....的语句,DataModule是AutoCreate,而Form1不能AutoCreate,所以会出错,请问应该怎样做? 谢谢!
Mickey
版主


發表:77
回覆:1882
積分:1390
註冊:2002-12-11

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-05-07 14:43:32 IP:218.32.xxx.xxx 未訂閱
if Form1<>nil then Form1.Image1.visible:=.....
xxiaowang
中階會員


發表:51
回覆:75
積分:55
註冊:2005-01-26

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-05-07 17:22:24 IP:218.17.xxx.xxx 未訂閱
if Form1<>nil then Form1.Image1.visible:=..... ----------------------------------------- 您好!Mickey, 我也是这样写的,不过还是会出错,我用单步执行,发现Form1虽然尚未Create, 但奇怪的是Form1<>nil始终为True。
h@visli
資深會員


發表:103
回覆:429
積分:431
註冊:2004-02-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-05-08 09:49:50 IP:222.248.xxx.xxx 未訂閱
Access violation錯誤多是因為使用了並不存在的物件而引起的,所以我懷疑是不是因為在執行AfterScroll時,DataModule還沒完成創建?
------
------------------------
博采眾家之長,奉獻綿薄之力
------------------------
系統時間:2024-05-18 12:14:16
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!