一个很简单的问题，可是偶不懂大家来领分了~问题太白痴的话不要笑话偶~

Question

begin
if (mima.text<>'123456') or (zhanghao.text<>'chenzhiqian') then
showmessage('错误的帐号或密码请重新输入')
else
showmessage('欢迎你使用本程序');
form1.Hide;
Form2.Hide;
  AnimateWindow (Form2.Handle, 3000, AW_CENTER);Form2.Show;
end;
现在的现象：
我如果输入正确的帐号和密码。执行的是正确的一切
可是我如果输入错误的帐5号密码。执行步骤为
1、弹出。错误的提示showmessage('错误的帐号或密码请重新输入')
2、显示FORM2。
3、form1没有隐藏我想得到的结果是：
1、输入正确的帐号密码。隐藏，form1显示form2.
2、输入错误的帐号密码。错误提示，并且什么都不执行。

Answer 1

>>2、输入错误的帐号密码。错误提示，并且什么都不执行。if (mima.text<>'123456') or (zhanghao.text<>'chenzhiqian') then
begin
 showmessage('错误的帐号或密码请重新输入');
 exit;
end
else

Answer 2

if (mima.text<>'123456') or (zhanghao.text<>'chenzhiqian') then
  begin
    showmessage('错误的帐号或密码请重新输入');
    close;
  end

Answer 3

begin
if (mima.text<>'123456') or (zhanghao.text<>'chenzhiqian') then
 begin
showmessage('错误的帐号或密码请重新输入');
exit;
end
else 
begin
showmessage('欢迎你使用本程序');
form1.Hide;
Form2.Hide;
  AnimateWindow (Form2.Handle, 3000, AW_CENTER);Form2.Show;
end;
end;

Answer 4

谢谢 大家咯 
呵呵，原来
PASCAL里面的IF语句为
IF 条件  then
begin
end
else
begin
end;
end;
的呢~