理解 Delphi 的类(十) - 深入方法[8] - 如果忘了返回值

ok060

于 2023-05-30 13:44:04 发布

阅读量64

点赞数

分类专栏：编程语言文章标签： Delphi

本文链接：https://blog.csdn.net/ok060/article/details/130946615

版权

编程语言专栏收录该内容

4 篇文章 0 订阅

订阅专栏

在Delphi中，即使忘记定义函数的返回值，该函数仍然可以作为过程使用。例如，一个本应返回字符串的MyFun函数只修改了传入的变量x，而没有返回值。在Button1Click事件中调用这个函数后，显示i的值变为3，说明函数已执行但未按预期提供返回结果。

摘要由CSDN通过智能技术生成

//要点8: 忘了写返回值的函数, 也可以当过程用(没有人会这样做, 但 Delphi 竟然也允许)
function MyFun(var x: Integer): string;
begin
  x := x + 1;
end;

{调用}
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  i := 2;
  MyFun(i);
  ShowMessage(IntToStr(i)); {3}
end;

下一篇：理解 Delphi 的类(十) - 深入方法[9] - 调用时的括号