Delphi题目,帮我想想呀,急~~~

打开delphi
放置一个.edit.一个button

双击button写事件

if edit1.text='1' then showmessage('欢迎进入!');
if edit1.text='2' then showmessage('密码错啦!');
if edit1.text='3' then
showmessage('怎么还不知道呢')
else
showmessage('在不知道不让你进啦~~!');