Pascal语法错误

Question

我的程序中有以下功能：

function Getrand(rStart,rEnd:Integer): Integer;
var
diff: Integer;

begin
diff := rEnd - rStart;

Getrand := Random(diff) + rStart;
end;

当我尝试编译程序时，我收到此错误：

Failed when compiling
Line 27: [Error] (27:9): Invalid number of parameters in script 

我做错了什么？

Answer 1

也许你的Pascal风格不支持传统的返回值语法。请尝试使用Result := …代替Getrand := …。

Answer 2

你可以使用

Exit(Random(diff) + rStart)

代替。但请记住，如果你这样做，它将在返回值后退出函数。

Answer 3

你需要写Getrand（Random（diff），rStart）;将变量发送到函数