这句判断语句为什么会报错？

窗体上有combobox1和Listbox1二个组件，通过combobox1选择一种机式，LIstbox1框里就出现该机式的种类。
procedure (Sender: TObject);
begin
 if combobox1.text='飞机'then
   begin
    listbox1.Items.Add('F-16战机');
    listbox1.Items.Add('F-35A战机');
    listbox1.Items.Add('苏-30MKI战');
   end
 else if combobox1.Text:='直升飞机'then---这里就报错，
    begin
       listbox1.Items.Add('米-35攻击直升机');
       listbox1.Items.Add('米-26直升机(一)');

    end
  else
end;
我不用嵌套判断就成功。用嵌套到第二句判断语句就报错，为什么？我用VB做时也和上面判断思路是一样的，VB就成功。为什么D7就会报错？
D7的语法有什么要求吗？
请高手帮帮忙试试看这是什么原因