Екатерина Сухова with Combobox1 do if ItemIndex< Items.Count-1 then ItemIndex:=ItemIndex+1; Как-нибудь так.