理解 Delphi 的类(二) - 初识类的方法

======================================================

注：本文源代码点此下载

======================================================

对类的解释确实写得不错,通俗易懂,让初学者或对类不太清楚的人来讲很有帮助。
对于你例中所举的两个方法,一个是过程,一个是函数,两个都使用了引用传递,这样两个方法的调用其实就一样了。如第一段代码改成:
//调用过程与函数
procedure tform1.button1click(sender: tobject);
var
i: integer;
begin
i := 6;
myproc(i);{使用过程}
showmessage(inttostr(i)); {12}
i := 6;
myfun(i);{使用函数}
showmessage(inttostr(i)); {12}
end;
end.
两者的调用方法是完全一样的,生成的结果也一样,这就不能区分过程和函数之间的区别了。如果将函数定义部分和实现部分括号内的var去掉,这时候就是传值的了,函数的作用就比较明显。如下:
functionmyfun (x: integer): integer;
function myfun( x: integer): integer;
begin
x := x * 2;
result := x;
end;
这样再用到你的第一个例子,函数和过程的意思就更明确了。
一般情况下,为了保证过程或者函数的独立性,尽量不要使用引用传递,推荐使用值传递,如果该实现部分的调用都用值传递相当于将x定义为实现部分的全局变量了,这对设计健壮的代码是有害的。当然在某些情况下使用引用传递更简捷方便有效,如果没有交叉冲突,未偿不可。
回复 引用

======================================================

在最后，我邀请大家参加新浪APP，就是新浪免费送大家的一个空间，支持PHP+MySql，免费二级域名，免费域名绑定
这个是我邀请的地址，您通过这个链接注册即为我的好友，并获赠云豆500个，价值5元哦！短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了，每天挂广告赚50+元哦，呵呵，饭钱不愁了，\(^o^)/