2011-02-11 18 views
0

は、私は私のプログラムでは、以下の機能があります:私はプログラムをコンパイルしようとするとパスカル構文エラー

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 

は私が間違って何をしているのですか?

+1

これは過去の記憶を引き戻します。最後のhavはいくつかのパスカルコード** X - )を見たとき –

+1

どちらが27行ですか? –

+0

@Marceloこの行: 'Getrand:=ランダム(diff)+ rStart;' –

答えて

5

おそらく、あなたの風味は伝統的な戻り値の構文をサポートしていません。 Getrand := …の代わりにResult := …を試してください。

+0

Tyvm、それはそれでした:) –

3

あなたの代わりに

Exit(Random(diff) + rStart) 

を使用することができます。しかし、それを行うと、値を返すと関数から終了することに注意してください。

2

Getrand(Random(diff)、rStart)を記述する必要があります。関数に変数を送信する