首页 > 代码库 > 第二课 类的定义与使用
第二课 类的定义与使用
使用类之前使用关键字type来声明一个类如
type
A = class
i,j,k:integer;
procedure setA(a,b,c:integer);
function gerA():integer;
end;
这里已经定义了一个类,现在我们来使用类
在使用类之前,我们先必须给下面2行
procedure setA(a,b,c:integer);
function gerA():integer;
代码实现如下功能:
function A.getA(): Integer;
begin
Result:= i+j+k;
Writeln(result);
end;
procedure A.setA( a, b, c: integer);
begin
i:= a;
j:= b;
k:= c;
end;
先给类A示例话一个对象a1
var
a1:A;
begin
{ TODO -oUser -cConsole Main : Insert code here }
a1:=a.Create; //实例化a1
a1.setA(1,2,3);
a1.getA(); //结果为6
Readln;
end.
下节课给大家讲解封装,继承和多态的实现。持续跟新中。。。
第二课 类的定义与使用
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。