2010年8月27日

访问限制(或者叫可见性)
摘要： http://www.cnblogs.com/del/archive/2008/01/16/1041446.html//下面说的数据成员不仅仅指方法TMyClass = class(TObject) function Fun1: string; {公共区域的数据成员在默认状态下会归于 published 区} //所谓默认状态就是编译指令为{$M+}, 如果是{$M-}这些数据成员会归于 publ... 阅读全文
posted @ 2010-08-27 16:30 dengdeng 阅读(168) 评论(0) 推荐(0) 编辑
方法类型
摘要： http://www.cnblogs.com/del/archive/2008/01/15/1039415.html{定义方法类型}type TFunType = function(x: Integer): Integer; {函数类型} TProcType = procedure(name: string); {过程类型}{定义一个符合 TFunType 类型的函数}function MyFun... 阅读全文
posted @ 2010-08-27 16:21 dengdeng 阅读(198) 评论(0) 推荐(0) 编辑
静态数组参数
摘要： http://www.cnblogs.com/del/archive/2008/01/14/1039006.html//静态数组做参数, 不能这样使用:function MyFun(arr: array[0..9] of Integer): Integer;var i: Integer;begin Result := 0; for i in arr do Result := Result + i;... 阅读全文
posted @ 2010-08-27 16:15 dengdeng 阅读(213) 评论(0) 推荐(0) 编辑
类操作
摘要： {对象的 ClassType 方法返回对象的 TClass} ShowMessage(Self.ClassType.ClassName); {TForm1 - Form1 的类名} MyClass := Self.ClassType; ShowMessage(MyClass.ClassName); 阅读全文
posted @ 2010-08-27 16:04 dengdeng 阅读(161) 评论(1) 推荐(0) 编辑
初识类的事件
摘要： http://www.cnblogs.com/del/archive/2008/01/11/1034525.html TMyEvent = procedure of object; {TMyClass 类} TMyClass = class strict private FAge: Integer; {年龄字段} FOnHundred: TMyEvent; {为我们刚刚定义的 TMyEvent 类... 阅读全文
posted @ 2010-08-27 15:57 dengdeng 阅读(97) 评论(0) 推荐(0) 编辑
类引用示例
摘要： http://www.cnblogs.com/del/archive/2007/12/17/1003289.htmlClassRef: TControlClass; //TControlClass 是 TControl 的类引用procedure TForm1.FormCreate(Sender: TObject);begin RadioGroup1.Width := 300; RadioGrou... 阅读全文
posted @ 2010-08-27 15:51 dengdeng 阅读(109) 评论(0) 推荐(0) 编辑
静态方法 和 virtual ,Dynamic，override 的理解
摘要： 参考万一老师： http://www.cnblogs.com/del/archive/2007/12/17/1002959.html理解如下： TBase = class procedure proc1; virtual; procedure proc2; end; TChild = class(TBase) procedure proc1; override; procedure proc2; ... 阅读全文
posted @ 2010-08-27 15:09 dengdeng 阅读(262) 评论(0) 推荐(0) 编辑

导航