В общем записываю в комбобокс
название материала и его id из базы данных
Combo1.AddItem objRs(1) 'название
Combo1.ItemData(Combo1.NewIndex) = objRs(0) 'id
при значении Combo1.NewIndex = 32768
вылетает ошибка overflow
Неужели массив ItemData находится только в диапозоне Integer и не выходит за этот диапозон?
как при этом записать в комбос и названия и id?*