重温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.