out 定義的變量經過測試好像只是 String 類型的會清零,但是其他類型變量傳進out 類型參數的時候并不起變化。
以下是搜索結果:
var 與 out 均是 Pass by Reference 的,在 function 裡修改了 param 的值就會反映在傳入這個 Param 的變數中;但 var 是連原本該變數的值一起傳入而 out 就會先消掉原本該變數的值才傳入,所以 out 的 param 一開始是空的只用來接收在 function 裡指給他的值。
不過,我自己在 Delphi 7 測試過 integer / record (TRect) / Object (TFont) 發覺 Out parameter 均沒有消掉原先的值,所以 out parameters 還是有著呼叫 function 時變數的值,與 var 一模一檥。
Help 中也說 分散物件 Model 如 COM 和 CORBA out 很常用但這方便我便沒測試了。
所以慨念上,Out Param 應是只用來存放在 function 裡指給它的 output 而不應假設他本身有任何值,雖然在Delphi 7實作時他是和 var 一樣存著呼叫時的起始值。
An out parameter, like a variable parameter, is passed by reference. With an out parameter, however, the initial value of the referenced variable is discarded by the routine it is passed to. The out parameter is for output only;
that is, it tells the function or procedure where to store output, butdo
esn't provide any input.
看上去,好象是说过程里不能去读out参数的值,因为它的初始值是不可知的,但实际上如果你读了,编译器连个警告都没有,而且out参数也并不是被调用者事先清零(象C#那样),它唯一的用处就是让写过程的程序员警惕一下,这个参数没有什么初始值的,只能给它赋值,而永远不要去用它的值……这一切只能靠程序员人肉保证,编译器一点忙都帮不上。
{ 没有一点警告 }
var
tmp: Integer;
procedure Foo(out v: Integer);
begin
tmp := v;
v := 1;
end;