http://www.cnblogs.com/del/archive/2008/01/14/1038118.html
理解 Delphi 的类(八) - 关于类的定义 //标准语法
TMyClass1 = class(TObject) end;
//如果是继承自 TObject 可以省略
TMyClass2 = class end;
//可以实现多个接口; 实现接口时经常用到 TInterfacedObject 类, 它实现了接口的默认方法
TMyClass3 = class(TInterfacedObject, Interface1, Interface2) end;
//现在 TMyClass4 相当于 TObject 的别名
TMyClass4 = class(TObject);
//用 class abstract 说明抽象类, 但内部必须有抽象方法, 才是真正的抽象类.
TMyClass5 = class abstract(TObject)
procedure Proc; virtual; abstract;
end;
//用 class sealed 定义不可继承的类
TMyClass6 = class sealed(TObject)
//...
end;
//这是定义了一个 TObject 类型的指针; TMyClass 称作 TObject 的类引用或元类
TMyClass = class of TObject;
//类中数据成员的排列顺序一般是: 字段、方法、属性
//访问权限区域的顺序一般是: 无限制区(默认 published) private protected public published //如果是继承自 TObject 可以省略
TMyClass2 = class end;
这段什么意思和其它有什么分别?
有没有例子可以让我了解 “继承自 TObject 可以省略”??
要完好的例子。。 谢谢。。
理解 Delphi 的类(八) - 关于类的定义 //标准语法
TMyClass1 = class(TObject) end;
//如果是继承自 TObject 可以省略
TMyClass2 = class end;
//可以实现多个接口; 实现接口时经常用到 TInterfacedObject 类, 它实现了接口的默认方法
TMyClass3 = class(TInterfacedObject, Interface1, Interface2) end;
//现在 TMyClass4 相当于 TObject 的别名
TMyClass4 = class(TObject);
//用 class abstract 说明抽象类, 但内部必须有抽象方法, 才是真正的抽象类.
TMyClass5 = class abstract(TObject)
procedure Proc; virtual; abstract;
end;
//用 class sealed 定义不可继承的类
TMyClass6 = class sealed(TObject)
//...
end;
//这是定义了一个 TObject 类型的指针; TMyClass 称作 TObject 的类引用或元类
TMyClass = class of TObject;
//类中数据成员的排列顺序一般是: 字段、方法、属性
//访问权限区域的顺序一般是: 无限制区(默认 published) private protected public published //如果是继承自 TObject 可以省略
TMyClass2 = class end;
这段什么意思和其它有什么分别?
有没有例子可以让我了解 “继承自 TObject 可以省略”??
要完好的例子。。 谢谢。。
TMyClass2 = class(TObject)end;
所以TMyClass2 = class(TObject)也可以简写成TMyClass2 = class
TObject是老祖宗。