關於baseform與interface |
尚未結案
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
有在寫資料庫應用ap的朋友,可能都有建立baseform的設計 小弟目前的工作也是同樣的應用 不過,我有幾個一直以來的疑點 1.當初baseform的設計只有對應到bde類的dataset(ttable,tquery),如果要能使用ado,這個baseform延伸出來的很多應用諸如一些共用library等於要一個個挑出來改,還得擔心蜘蛛網會不會延伸跨了太多個unit而沒改到 2.如果原本的baseform是這樣的設計 aform->bform->apforma(例如出貨單)
|
->apformb(例如查詢頁面) 我曾想過要大刀闊斧擺脫bform與aform的牽連,做一個比較理想的xform,然後把現有這些寫好的form改為繼承自這個超級xforom. 可是我又發現這些後代form的code裡面,包函了很多"前人"留下來的各個包裝成為function的unit以例如 if self.InheritsFrom(Aform)=true 這樣的程式碼,那等於又陷入蜘蛛網當中繼續當spider man? 3.我看了code6421的 http://delphi.ktop.com.tw/topic.php?topic_id=28754 這一篇,不知道是否有朋友可以幫忙解惑是否引入interface的設計會比較理想,就算是這家公司用不到,以後有機會打造baseform希望能造福人群. 謝謝各位 p.s. 看了http://delphi.ktop.com.tw/topic.php?topic_id=64807 這篇,覺得李維跟code6421的表演真是精彩,可是我都看不懂,我根本不了解什麼是編譯器的中文訊息英文訊息,我也不了解什麼是C /CLI,目前公司用delphi5,就寫的天昏地暗日月無光了,有時想想,是否自己太肉腳,不適合寫程式這個工作. 發表人 - hahalin 於 2005/03/01 11:13:06
|
william
版主 發表:66 回覆:2535 積分:3048 註冊:2002-07-11 發送簡訊給我 |
If I were you, I would make use of TClientDataSet. The the real implementation is TDataSetProvider + BDE/ADO/etc... Well... that's probably a rewrite < face='Lucida Console'>http://pywong.hk.st http://www.lazybones.ca
|
pcplayer99
尊榮會員 發表:146 回覆:790 積分:632 註冊:2003-01-21 發送簡訊給我 |
|
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
不好意思 我所描述的原有baseform的部份可能有所誤會 預設以bde類的dataset來動作,這段話舉例來說 例如存檔,在form中建立一個物件變數 dt:tdataset 然後在存檔時 if dt is tquery then
tquery(dt).applyupdate 當然細節還很多,上面的程式碼幫忙說明為主,主要是牽連到的procedure/function等都是預設以bde類的tdataset,更有甚者在master-detail部份中的detail以ttable來處理. 我的想法也是一樣,在baseform中理想狀況應該是不能限定在bde,ado,因此才會想到interface是否可以有這樣的運用. 如有謬誤還請不吝指正,更歡迎有idea的想法一起討論...
|
bruce
中階會員 發表:19 回覆:121 積分:83 註冊:2002-04-16 發送簡訊給我 |
|
sanhang
一般會員 發表:12 回覆:25 積分:17 註冊:2002-08-31 發送簡訊給我 |
|
pcplayer99
尊榮會員 發表:146 回覆:790 積分:632 註冊:2003-01-21 發送簡訊給我 |
引言: 不好意思 我所描述的原有baseform的部份可能有所誤會 預設以bde類的dataset來動作,這段話舉例來說 例如存檔,在form中建立一個物件變數 dt:tdataset 然後在存檔時 if dt is tquery then tquery(dt).applyupdate 當然細節還很多,上面的程式碼幫忙說明為主,主要是牽連到的procedure/function等都是預設以bde類的tdataset,更有甚者在master-detail部份中的detail以ttable來處理. 我的想法也是一樣,在baseform中理想狀況應該是不能限定在bde,ado,因此才會想到interface是否可以有這樣的運用. 如有謬誤還請不吝指正,更歡迎有idea的想法一起討論...我猜,你的意思是如何把和BDE有关的代码和其它代码分隔开。 如果用 DataModule 来封装 DataSet,并且,在 DataModule 以外的其它FORM里不直接操作 DataModule 里的DataSet,而是改由 DataModule 里声明的public的procedure来操作里面的DataSet。对于数据感知元件,由DataModule里输出的DataSource来让其它FORM里的DBGrid类的数据感知元件连接到DataSet。 那么,当你不用BDE,改用ADO的时候,只要换一个DataModule,把PUBLIC里的procedure 重新copy一份,里面的BDE dataSet 换成 ADODataSet,就一切OK啦。其它地方的FORM不用做改动,只把涉及到DataModule名字的地方换成第2个DataModule就行了。这个做法,没涉及到IInterface. 如果想不用在每个FORM里去改DataModule的名字,就必须要直接改掉原来那个DataModuel,把里面的BDE DataSet改成ADODataSet,而不是新做一个DataModule。或者,DataModule都从BaseDataModule继承下来,BaseDataModule里事先把public里的那些procedure 声明成 vitural;abstract;,让继承的2个DataModule分别实现BDE和ADO,这样FORM里就不用管它究竟是用了哪个DataModule了。 如果用 IInterface,用不同的元件来实现同一个 IInterface,在不同的元件里采用不同的 DataSet,要更换DataSet,使用到IInterface的地方也会更改元件的名字。为了其它FORM里都不用去改涉及到的元件的名字,只好直接把原来那个元件里的DataSet改掉了。 在我自己看来,有时候,用IInterface和用虚拟方法的继承,用法差不多。不同的是IInterface可以让任何元件来实现,虚拟方法的继承必须是在继承的元件里实现。 个人的一点浅见,请高手指正。 |
hahalin
版主 發表:295 回覆:1698 積分:823 註冊:2002-04-14 發送簡訊給我 |
|
pcplayer99
尊榮會員 發表:146 回覆:790 積分:632 註冊:2003-01-21 發送簡訊給我 |
引言:BaseForm里使用 Interface?我不清楚你想实现什么样的功能? 我用 Interface,大概是用来解决这个问题: 比如,我有几个不同的class,都有可能被一个class调用里面的一个相同的方法。在设计上,我可能用虚拟继承的方式:引言: 我猜,你的意思是如何把和BDE有关的代码和其它代码分隔开。感謝您的回應 因為我對interface的用法不熟 如果如同我上面的想法之ㄧ,在建立baseform的時候引入了interface的設計呢? TBaseClass=class public procedure DoSomething(const S:String);virture;abstract; end; TMyClass_1=class(TBaseClass) public procedure DoSomething(const S:String);override; end; TMyClass_2=class(TBaseClass) public procedure DoSomething(const S:String);override; end;但这样做,要求所有class必须是从TBaseClass继承下来。如果我有一个class可能必须从其它class继承下来,但又必须提供这个方法,就只有改成使用Interface了。 这是我自己用Interface的一个理由。采用Interface来实现多态。 不知道你想在 BaseForm 里实现什么样的目的? |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |