有關多形的問題 |
|
答題得分者是：Skyer
|
|
maker
一般會員   發表：3 回覆：6 積分：1 註冊：2002-04-15 發送簡訊給我 |
請問如果有一個class TA,有個method getValue:String;
另有兩個classes(分別是TA1,TA2)繼承自TA,並都改寫getValue
今天宣告了一的陣列 F : array of A;
在主程式中分別將A1,A2等多個classes置入F中,
ex:
setlength(F,5);
F.addA(TA(A1));
F.addA(TA(A2));
F.addA(TA(A1));
F.addA(TA(A1));
F.addA(TA(A2));
在取出F陣列中的class時,置入P物件(TA型態),在if判斷式使用ClassName屬性能判斷F[i]是TA1 or TA2,
然後在分別呼叫TA1(P).getValue or TA2(P).getValue 請問OP有沒有比較好的方式可以直接叫用,而不必先判斷class類型,ex:直接使用 P.getValue 因為若由TA再延伸出更多類型的話,if...else if....要寫很多,好像不是好方法.. ~~~~沁涼如水 清韻隨吟~~~~
------
~~~~沁涼如水 清韻隨吟~~~~ |
|
Skyer
高階會員  發表：43 回覆：111 積分：120 註冊：2002-04-04 發送簡訊給我 |
引言: 請問如果有一個class TA,有個method getValue:String; 另有兩個classes(分別是TA1,TA2)繼承自TA,並都改寫getValue 今天宣告了一的陣列 F : array of A; 在主程式中分別將A1,A2等多個classes置入F中, ex: setlength(F,5); F.addA(TA(A1)); F.addA(TA(A2)); F.addA(TA(A1)); F.addA(TA(A1)); F.addA(TA(A2)); 在取出F陣列中的class時,置入P物件(TA型態),在if判斷式使用ClassName屬性能判斷F[i]是TA1 or TA2, 然後在分別呼叫TA1(P).getValue or TA2(P).getValue 請問OP有沒有比較好的方式可以直接叫用,而不必先判斷class類型,ex:直接使用 P.getValue 因為若由TA再延伸出更多類型的話,if...else if....要寫很多,好像不是好方法.. ~~~~沁涼如水 清韻隨吟~~~~ TA=class function getValue: String; virtual; end; TA1=class(TA) function getValue: String; override; end; TA2=class(TA) function getValue: String; override; end;這應該可以達到您的目地吧.. 取出來時，直接 Call TA(P).getValue 就會 call 對應 TAx Class 的 getValue 了 如果 TA 是 abstract class 的話.. 把 getValue 的 virtual; 後加上 abstract; 就行了.. -- Regards, Skyer 發表人 - skyer 於 2002/12/22 14:54:41 發表人 - skyer 於 2002/12/22 23:36:57
------
-- Regards, Skyer |
|
zong
初階會員 發表：11 回覆：51 積分：42 註冊：2002-08-18 發送簡訊給我 |
發表時間：2002-12-22 03:30:12
IP:61.230.xxx.xxx 未訂閱
系統時間：2024-05-05 13:13:42
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |