case combobox1.ItemIndex of
  0:showmessage('0');
  1:showmessage('0');
  //...
end;