我在窗体上画了个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'
我是按书上的代码写的怎么会有这些错误呢
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'
我是按书上的代码写的怎么会有这些错误呢
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货