Cuando la propiedad ItemIndex tiene como valor -1, es porque no debe haber seleccionado ningun item, por lo que no habria necesidad del if, con la siguiente instrucción tendriamos el mismo efecto:
Código Delphi
[-]combo1.ItemIndex := combo1.items.count -1;