Question

Delphi怎么定义一个有返回值的方法

Answer 1

delphi 里，有返回值的都是函数，没有返回值的是过程方法。

示例如下：

函数：

function Format(const Format: string; const Args: array of const): string;
begin
  Result := System.SysUtils.Format(Format, Args, FormatSettings);
end;

过程：

procedure ShowMessage(const Msg: string);
begin
  ShowMessagePos(Msg, -1, -1);
end;

 

需要提示的是:

在 delphi 里当定义了一个函数后，每个函数会自动生成一个 result 的变量，其类型就是定义的返回值类型，可以直接对 result 进行赋值、计算等操作，函数也会自动将 result 的最终值作为结果返回。