今天在CSDN論壇里面游逛,發(fā)現(xiàn)這樣的一個帖子《剛才看到一位武林高手的幾行精妙代碼,百思不得其解,希望各位指點》,本著向各大武林高手學(xué)習(xí)的態(tài)度,我看完了整個帖子,發(fā)現(xiàn)內(nèi)容甚為經(jīng)典,記錄于此,作個總結(jié):
type
TStringGridEx = class(TStringGrid);
PRocedure TForm1.Button1Click(Sender: TObject);
begin
if TStringGridEx(StringGrid1).RowCount > 5 then
TStringGridEx(StringGrid1).DeleteRow(5);
end;
---------------------------------------------------------
這是要在StringGrid中刪除一行的代碼。這個問題我搞了2個小時沒有搞定,然后就搜帖子,發(fā)現(xiàn)這位高人的代碼,簡直敬佩之情如黃河之水綿綿不絕,運行也通過。但是為啥TStringGridEx = class(TStringGrid);這個東西就可以有DeleteRow()方法呢?它明明也是繼承的TStringGrid,和TStringGrid是一樣的???我頭都大了!希望各位指點!
以上就是樓主提問內(nèi)容,問題的確奇怪,經(jīng)過各大掌門的討論得出了一個DELPHI特有的保護級成員的應(yīng)用特點,這應(yīng)該也是DELPHI獨有的一個面向?qū)ο笾С痔攸c,總結(jié)如下:
1.TForm里面可以訪問到TStringGridEx的protected成員,因為它們定義在同一個單元里面
2.TForm里面不能訪問到TStringGrid的protected成員,因為他們不是定義在同一個單元里面
3.由于TStringGridEx = class(TStringGrid),所以在這里訪問TStringGridEx的protected成員就相當于訪問TStringGrid的protected成員
4.TStringGridEx只是一個中介,功能沒有擴展但是把TStringGrid的作用域引入到這個單元中來了,所以TForm可以訪問TStringGrid的protected成員了
掌門一的看法是DELPHI的PROTECTED和PRIVATE成員對于同一UNIT里面的各種類和對象都是可見的,而且PROTECTED成員可以在友員子類的UNIT中可見,于是TStringGridEx 哪怕只是繼承了TStringGrid沒作任何修改,也令TStringGrid中的PROTECTED成員在TStringGridEx的UNIT中可見(這其中還有一個原因是TStringGrid并不是定義在本UNIT,所以只能通過繼承使本UNIT成為友員,使TStringGrid的PROTECTED成員開放),問題解決了。我們也從中可以一窺DELPHI的面向?qū)ο筇攸c。
不過反正delphi也風(fēng)光不再了,湊乎用吧
掌門三的評論:沒有完美的東西??!只有適合的東西哦!
掌門四的評論:protected起來的方法一般是隱藏的,所以直接生成該類的實例是不能引用該方法的,但是在delphi中將位于同一個單元的類自動認為是友類,可以訪問其protected方法,所以在相應(yīng)單元中寫一個子類的實現(xiàn)就可以看到protected起來的方法了
新聞熱點
疑難解答
圖片精選