刚开始学delphi，问一个简单的问题。

Question

procedure TForm1.Button8Click(Sender: TObject);
begin
TabSheet4.show
RSVAttemper();
end;
procedure RSVAttemper();
var
   ri :array[1..36]of single;       
   begin
     for i:=1 to 36 do
     ri[i]:=i;
   end;运行时出错，说引用过程那一行：missing operator or semicolon请问怎么回事呀，谢谢

Answer 1

procedure TForm1.Button8Click(Sender: TObject);
begin
TabSheet4.show;//少;
RSVAttemper();
end;

Answer 2

加上了，还是错，
说 undeclared identifier RSVAttemper然后我在  开头的  type下加上
  procedure RSVAttemper();结果还是错

Answer 3

在type里的private 下或 public 下添加 procedure RSVAttemper;//没参数不带括号
在实现时:
procedure TForm1.RSVAttemper;
begin
.
.
.
.
.
end;