重溫Delphi之:如何定義一個類
先談談工具問題:
雖然d7很經典，但畢竟是02年出的開發工具了，對於習慣了vs2008被微軟寵壞的.net程序員來講，重返d7已經有點找不着感覺了（起碼連最基本的代碼折疊功能都沒有），還好delphi開發工具並沒有停步不前，新出來的delphi2010已經做得很不錯了，建議delphi迷們與時俱進，換裝備吧！
玩轉了delphi語法后，會發現其實oo的東西都是差不多的，何況c#和vs的創建者，據說是MS從borland挖過來的天才，刨根問底算起來，就是一家人:)
上圖中的代碼，已經展示了如何在delphi中定義一個類，除了語法/寫法不同，其它的都大同小異
定義好類以后，就可以這樣使用了:
program
PUnit;
{ $APPTYPE CONSOLE }
uses
SysUtils,
UnitTools in ' UnitTools.pas ' ;
var
s: string ;
obj:MyClass;
begin
obj : = Myclass.Create;
obj.F : = ' Hello Class ' ;
writeln(obj.F);
obj.Free;
Readln;
end .
{ $APPTYPE CONSOLE }
uses
SysUtils,
UnitTools in ' UnitTools.pas ' ;
var
s: string ;
obj:MyClass;
begin
obj : = Myclass.Create;
obj.F : = ' Hello Class ' ;
writeln(obj.F);
obj.Free;
Readln;
end .
注意！
本站转载的文章为个人学习借鉴使用，本站对版权不负任何法律责任。如果侵犯了您的隐私权益，请联系我们删除。