类声明举例
例如：以下代码声明了一个
例如：以下代码声明了一个
TMyClass
TMyClass
类
类
Type //
Type //
类型定义关键字
类型定义关键字
TMyClass = Class //
TMyClass = Class //
类声明
类声明
private
private
FNum : Integer; //
FNum : Integer; //
定义类的私有变量
定义类的私有变量
Procedure SetNum(Value: Integer); //
Procedure SetNum(Value: Integer); //
定义类的方法
定义类的方法
public
public
Property pNum: Integer read FNum write SetNum; //
Property pNum: Integer read FNum write SetNum; //
定义
定义
类的属性
类的属性
end;
end;
Procedure TMyClass.SetNum(Value: Integer); //TMyClass
Procedure TMyClass.SetNum(Value: Integer); //TMyClass
类的方法实现
类的方法实现
begin
begin
FNum := Value;
FNum := Value;
end;
end;
评论0