delphi:out参数和var参数的区别

out主要用于COM和CORBA技术中。

procedure TForm1.Hello(out s:String);
begin
s:='Hello,'+ S;
end;

procedure TForm1.Button10Click(Sender: TObject);
var
A:string;
begin
A:='World!';
Hello(A);
showmessage(A);
end;

A的值显示为'Hello,'，因为out参数不接受值的传入。

procedure TForm1.Hello(var s:String);
begin
s:='Hello,'+ S;
end;

procedure TForm1.Button10Click(Sender: TObject);
var
A:string;
begin
A:='World!';
Hello(A);
showmessage(A);
end;