if name=''or password='' then语句为什么错？

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
name:=form1.Edit1.Text;
password:=form1.Edit2.Text;
if name='' or password='' then
begin
showmessage('error');
end
else
begin
form2.show
end;
end.

Answer 1

这样试试 if (name='') or (password='') then

Answer 2

应该是
if (name:=form1.Edit1.Text) and (password:=form1.Edit2.Text) then
begin
form2.ShowModal;
form1.Close;
end
else
showmessage('error');
end;
end.

Answer 3

错误信息是什么啊？name和password未声明
begin和end不配对