Question

delphi如何调用多个参数的函数

Answer 1

比如定义
function box(info:string;title: string):boolean;
begin
if application.MessageBox(PChar(info),PChar(title),mb_okcancel)=idok then
Result := true
else
Result := false;
end;

调用
flag := box('真的要退出系统吗？','友情提示');

Answer 2

函数中传递参数多个
修饰符为Const、Var、Out。另一种不加修饰符的为默认按值传递参数。
一、默认形式以值形式传递参数procedure TForm1.ProcNormal(Value: string);beginOrigNum:=Value+' Me';
lblReturn.Caption:=OrigNum;//OrigNum为'Hello Me'
lblOrig.Caption:=Value;//Value为'Hello'end;调用：OrigNum:='Hello';
ProcNormal(OrigNum);
二、以Const形式
传递参数，这个参数在调用流程中不能改动
，并且这种形式
会被编译器优化，一般建议尽可能地运用这种形式。
procedure TForm1.ProcConst(const Value: string);beginOrigNum:=Value+' Me';
lblReturn.Caption:=OrigNum;//为'Hello Me‘
lblOrig.Caption:=Value;//为'Hello Me'end;三、按引用形式传递参数procedure TForm1.ProcRef(var value: string);beginOrigNum:=Value+' Me';
lblReturn.Caption:=OrigNum;//为'Hello Me‘
lblOrig.Caption:=Value;//为'Hello Me'end;四、按Out形式
传递参数，这个形式
传递参数时，参数可以不被原始
化，即使有值也被忽视，它一般用于输出,它可以实现在一个流程
中返回多个值,我们通常在分布式对象模型，如COM中运用它。

Answer 3

和调用普通函数的方法一样的吧。