请教，为什么我的"添加"按钮不能用？急！！！！！

Question

procedure TForm1.btn_AddClick(Sender: TObject);
begin
  if btn_Add.Caption='添加' then
  begin
    ListView.Enabled:=False;
    edt_Name.Enabled:=True;
    dtp_Birthday.Enabled:=True;
    btn_Add.Caption:='取消';
    btn_Select.Enabled:=False;
    btn_Update.Enabled:=False;
  end
  else
  begin//注意！！！！你在这里少写了一个Begin～～～～～～
    ListView.Enabled:=True;
    edt_Name.Enabled:=False;
    dtp_Birthday.Enabled:=False;
    btn_Add.Caption:='添加';
    btn_Select.Enabled:=True;
    btn_Update.Enabled:=True;
  end;
end;