if..then..if...then...else...else..中的end不加分号

begin
  BitBtn_Login.Tag:=BitBtn_Login.Tag+1;
  if(Edit_User.Text<>'aa') or (Edit_PW.Text<>'aa') then
      if BitBtn_Login.Tag=3 then
      begin
        showmessage('错误超过3次,拒绝登入');
        modalresult:=mrcancel;
      end.................................................不加分号
      else
      begin
        showmessage('用户名或密码错误,请重新登入!');
        Edit_User.Text:='';
        Edit_Pw.Text:='';
        Edit_User.SetFocus;
      end.................................................不加分号
  else
  modalresult:=mrok;
end;