提示type of expression must be boolean

var
  au:Integer;
begin
  if (edt1.Text<>'')and (edt2.Text<>'')and (edt3.Text<>'')and
  (edt2.Text=edt3.Text) then
  begin
    Data.ADOLogin.append;  
    Data.ADOLogin['Username']:=edt1.text;
    Data.ADOLogin['Password']:=edt2.text;
    if cbb1.Text='6 缴费管理' then
    au:=6
    else if cbb1.Text='7 维修管理'then
    au:=7
     else if cbb1.Text:='8 出入管理'then
    au:=8
    else if cbb1.Text:='9 户籍管理'then
    au:=9
    else if cbb1.Text:='10 系统管理'then
    au:=10
    data.ADOLogin['Authorization']:=au;
    data.ADOLogin['LastLogin']:=Now;
    data.ADOLogin.post;
    end

运行以上代码 提示type of expression must be boolean 该如何修改 各位帮帮忙
[解决办法]
else if cbb1.Text:='8 出入管理'then
else if cbb1.Text:='9 户籍管理'then
else if cbb1.Text:='10 系统管理'then

应该是=不是：=

还有，最后一个au:=10后面少个分号
[解决办法]
au:=10;
[解决办法]

引用:

else if cbb1.Text:='8 出入管理'then
else if cbb1.Text:='9 户籍管理'then
else if cbb1.Text:='10 系统管理'then

应该是=不是：=

还有，最后一个au:=10后面少个分号

if 语句应该是Boolean量，而不是赋值语句