Delphi 系统[19]关键字和保留字 object - 对象

Delphi 系统[19]关键字和保留字  object - 对象

1、定义：

• object ：定义对象类型，或声明“对象函数”或“对象过程”。 定义对象类型是 Object Pascal 中的一个古老的功能，这个功能现在已经被 class 取代。

2、示例：

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44

{Object用于声明一个对象, 这个对象可以是任意的, 并且向下兼容.Object只能被Object所继承. } {声明对象的方法与声明类的方法是相同的. } type 　objDemoA = object 　end; 　objDemoB = object(objDemoA) 　end;     { object 定义对象 MyObject 示例 } type   MyObject = object   private     FName: string;   protected   public     procedure ShowResult;     property Name: string read FName write FName;   end;    { 实现对象方法 } procedure MyObject.ShowResult; begin   ShowMessage('调用成功！'); end;    { 调用对象方法 } procedure TForm1.Button1Click(Sender: TObject); var    MyObj :MyObject; begin   MyObj.Name := 'Object 测试';   ShowMessage(MyObj.Name);   MyObj.ShowResult; end;        //Object关键字还用于声明动态函数或过程, 例如: type   { 该函数不能是独立的函数，必须是某个对象的成员 of Object }   TMyFun = function(I:Integer): Integer of object;   { 该过程不能是独立的过程，必须是某个对象的成员 of Object }   TMyProc = procedure(S: string) of object;

　　

 

 

 

 

创建时间：2021.08.12　　更新时间：