delphi条件不能实现？

Question

delphi条件不能实现？代码：
procedure TForm1.Button2Click(Sender: TObject);
if messagedlg('想唾了吗？',mtconfirmation,[mbyes,mbno],0)=mryes then
begin
 showmessage('别玩了');
 end；
 else
 showmessage('还想玩呢');
end;end.
书上是这么写的，为啥说是if语句。。

Answer 1

procedure TForm1.Button2Click(Sender: TObject);
begin
if messagedlg('想唾了吗？',mtconfirmation,[mbyes,mbno],0)=mryes then
  showmessage('别玩了')
else
  showmessage('还想玩呢');
end; 

Answer 2

else前面是不能出现分号的啊！！！！！！书上也有打印错误的啊  楼主要学会自己看错误提示  基本的东西别忘记多多巩固