国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

如何根據類的名字來生成對象

2019-11-18 17:57:37
字體:
來源:轉載
供稿:網友
有時候我們可能在程序中需要動態去生成一些對象,但我們又不想寫大量的case分支語句來實現,而是建一張表,根據類的名稱或其他一些索引來生成類的實例——對象。如果你有這方面的需要,本文將會幫助你實現這一目的。
在寫正文之前首先要引進一個概念,類的變量(自己起的準確不準確無所謂,只大家明白就行啦)。這個類的變量并非我們平時看到的這樣的定義如:Edit1:TEdit。這樣的定義只是定義了一個對象。如果想定義類的變量,我們需要這樣定義,首先要定義一個類型類的類 Type TEditClass=class of  Tedit;這樣的話TEditClass就是一個類的類型。我們就可以通過:Var  EditClass:TEditClaa;來定義類的變量了。如果我們想來生成一個TEdit的實例,就可以通過下面這段程序來實現:
type TEditClass=class of TEdit;
PRocedure TForm1.Button1Click(Sender: TObject);
var EditClass:TEditClass;
  Edit1:TEdit;
begin
  EditClass:=TEdit;
  Edit1:=EditClass.Create(self);
  Edit1.Parent :=self;
end;
這段代碼也許沒什么意義,但如果有大量的對象的時候,這樣做的用處就顯出來了。那就是可以根據類名或其它的東西來生成類的實例。而不是用大量的CASE語段來判斷該生成什么對象。需要注意的是,我上面定了的類之類是TEditClass,如果換成TEDIT的父類也是適用的。 如果把 Type TEditClass = class of TEdit 換成 TWInControlClass = class of TWinControl,程序照樣可以正確運行。
要想實現標題所提到的想法,我們可以這樣實現,構建一張表,其中至少有兩個字段,一個索引(比如字符串或整數等等),另一個就是類的變量,當然也可以加其他一些輔助的信息。這要視具體的情況而定。在需要生成對象的時候,我們可以先查找索引,如字符串或整數,再根據索引指向的類的變量來生成實例。
使用這種方法一定要注意:定義類的類的時候,這個類要是你需要生成類的父類,并且它們的構造函數的參數完全一樣。
這種方案可以做為使用工廠模式的一種具體實現方案。工廠類可以不知道自己有多少產品類,產品類自動用工廠類的增加方法來把自己添加到工廠類的產品列表中去。到產出產品對象的時候,工廠類自動根據產品名稱來生成產品類。這樣可以保證工廠類的絕對穩定性,即新增加產品的時候,工廠類不用做任何改動就可以運行。

上一篇:ADO方式下判斷數據表是否存在

下一篇:一個導出Excel非??斓念?/a>

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
熱門圖片

新聞熱點

疑難解答

圖片精選

網友關注

主站蜘蛛池模板: 宁阳县| 南江县| 西贡区| 哈巴河县| 兴和县| 始兴县| 四平市| 卓尼县| 肥东县| 广安市| 安陆市| 道真| 定远县| 年辖:市辖区| 昌黎县| 塔河县| 娄烦县| 额济纳旗| 上杭县| 玉环县| 贡山| 蓝山县| 和龙市| 积石山| 芮城县| 祁阳县| 定安县| 和田市| 瑞安市| 陕西省| 德州市| 措美县| 临高县| 望江县| 朔州市| 罗田县| 惠来县| 镇沅| 静乐县| 阿尔山市| 大姚县|