[The Shadow]

Код:

if ComboBox1.ItemIndex < ComboBox1.Items.Count - 1 then
ComboBox1.ItemIndex:=ComboBox1.ItemIndex + 1;