timer控件和val函数问题

Question

我把edit6里的内容通过val转为整型值赋给timer1的Interval
timer1.Interval:=val(edit6.Text)
调试时说：“Not enough actual parameters 没有足够的实际参数”
是怎么回事？？

Answer 1

var i:integer;
Timer1.Interval:=Val(Edit6.Text,i);

Answer 2

这样我也试过了
还是说：“Not enough actual parameters 没有足够的实际参数”

Answer 3

var i,code:integer;
begin
  Val(Edit6.Text,i,code);
  Timer1.Interval:=i;
end;

Answer 4

procedure Val(S; var V; var Code: Integer);
看帮助吧！