求Delphi 7 调用函数和过程的实例

发布网友发布时间：2022-04-21 07:04

共3个回答

热心网友时间：2022-06-18 14:49

过程没有返回值，也就是在过程体内不用加入Result:=返回值；
函数有返回值，也就是在函数体内要加入Result:=返回值；
这里的返回值是数据库类型，比如
Function Sum(a,b:integer) :integer; //这里最后的integer就是返回类型；而这个函数就是一个计算两数和的，调用方法就是
var
SumCount:integer;
begin
SumCount :=Sum(10,20); //将sum计算后的结果保存在SumCount变量中
showmessage(inttostr(sumcount)); //这里就弹出结果值
end;

而过程呢，因为没有返回值，所以为procere Sum(a,b:integer);
这样计算的和就不会存进刚那个变量中了，过程一般用在无返回值的地方
end;

热心网友时间：2022-06-18 14:49

函数和过程的区别在于，函数是有返回值的，而过程不需要返回。

比如下面这个是函数，将传入参数相加，然后返回相加的值；
function AddNum(a,b:integer):integer;
begin
Result:=a+b;
end;

调用的时候为:
C:=AddNum(3,5);

而过程是不能返回值的

procere showMsg(str:string);
begin
showmessage(str);
end;

调用的时候为 showMsg('Hello,World!');

热心网友时间：2022-06-18 14:50

//下面这是一个过程
procere msg(s: string);
begin
showmessage(s);
end;
//调用时
msg('hello!');

//------------------
//下面是个函数
function showJg(s1,s2: string): string;
begin
result := s1+s2;
end;
//调用时
var
s: string;
begin
s := showJg('a','b');
end;