我在窗体上画了个RadioGroup控件设置了4个item,在click事件中
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
Case RadioGroup1.ItemIndex of
0: showmessage('1');
1: showmessage('2');
3: showmessage('3');
4: showmessage('4');
end;
end.(这里一个错误[Error] Unit1.pas(35): ';' expected but '.' found,这个end. 应该是对的呀)
[Error] Unit1.pas(38): Declaration expected but end of file found
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
我是按书上的代码写的怎么会有这些错误呢