[社會(huì)學(xué)]delphi中的面向?qū)ο?資料下載頁
2024-10-19 01:17本頁面
【正文】 egin x:=。 。 readln。 end. 在面向?qū)ο蟪绦蛟O(shè)計(jì)中，多態(tài)性是指相同的操作，在不同類的對(duì)象中具體的實(shí)現(xiàn)過程不同。 Object Pascal支持兩種多態(tài)性： 編譯時(shí)的多態(tài)性 和 運(yùn)行時(shí)的多態(tài)性 。編譯時(shí)的多態(tài)性通過 重載 實(shí)現(xiàn)，運(yùn)行時(shí)的多態(tài)性通過 虛方法 來實(shí)現(xiàn)。 重載 在面向?qū)ο蟪绦蛟O(shè)計(jì)中，重載的含義是相同名字的函數(shù)或過程，在不同的場(chǎng)合可以表現(xiàn)出不同的行為，也就是說，可以同時(shí)定義多個(gè)具有相同名字的函數(shù)或過程，而它們的操作對(duì)象具有不同的類型。重載函數(shù)或過程用保留字overload來說明。 function Max(x,y:integer):integer。overload。 begin If xy then result:=x else result:=y。 (39。調(diào)用 Max(x,y:integer)函數(shù) 39。)。 end。 function Max(a,b:real):real。overload。 begin if ab then result:=a else result:=b。 (39。調(diào)用 Max(a,b:real)函數(shù) 39。)。 end。 procedure (Sender: TObject)。 var i1,i2:integer。 r1,r2:real。 begin i1:=8。i2:=5。 r1:=。r2:=。 (39。結(jié)果為 :39。+inttostr(Max(i1,i2)))。 (39。結(jié)果為 :39。+floattostr(Max(r1,r2)))。 end。 屬性與方法 ? 一、屬性 ? 二、方法 一、屬性 ? 在 Delphi中，組件的 屬性 可以看成是對(duì)類中數(shù)據(jù)進(jìn)行訪問和修改的特殊的 輔助域 。 ? 當(dāng)然，在 Delphi中，我們并不需要了解屬性是如何實(shí)現(xiàn)的，我們只要通過 Object Inspect窗口就可以設(shè)置組件的屬性值了。 二、方法 ? 方法在 Object Pascal中的形式就是類的過程成員或函數(shù)成員。方法描述對(duì)象的行為特征。 ? 在所有對(duì)象的方法中都有一個(gè)名為 self的隱含變量， self是一個(gè)指向調(diào)用方法的對(duì)象的指針。當(dāng)某個(gè)對(duì)象調(diào)用方法時(shí)，編譯器將 self指針指向該對(duì)象。 ? 在定義類的成員函數(shù)或過程時(shí)，如果在 procedure或 function前加上 class保留字，則該方法稱為類方法。類方法用類調(diào)用，而不是用對(duì)象調(diào)用，它們對(duì)類進(jìn)行操作，而不是對(duì)具體的對(duì)象操作。
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1