Добрый день.

Столкнулся с непонятной проблемой, возможно чего-то не понимаю, прошу прощения за банальный вопрос, тема такая есть у меня в программе combobox, в него из базы данных записываю определенную структуру (с этим вроде проблем нет) и вот в определенном месте я при выборе элемента combobox'a эту структуру "считываю"

Info := TInfoObj(cbTypeDevice.Items.Objects[cbTypeDevice.ItemIndex]);

и затем меняю некоторые значения Info

Info.sStr.PC20 := RoundTo(Info.sStr.PC20, 1);
Info.sStr.PC60 := RoundTo(Info.sStr.PC60, 1);
Info.sStr.PC100 := RoundTo(Info.sStr.PC100, 1);

Потом в другом месте программы мне снова нужно считать данные из combo? ну я естественно повторяю

Info := TInfoObj(cbTypeDevice.Items.Objects[cbTypeDevice.ItemIndex]);

и тут я замечаю, что у меня значения Info уже обновленные, а не первоначальные!!! Как такое может быть? Переменная Info у меня локальная для процедур

Я может непонятно объяснил cbTypeDevice.Items.Objects[cbTypeDevice.ItemIndex] - это комбо и он глобальный - значение его неизменно, в одной процедуре я считываю объект в локальную переменную Info для процедуры №1, затем в этой же процедуре я изменяю эту переменную Info. Потом в другой процедуре №2 я снова считываю из того же комбо в локальную для процедуры №2 переменную Info и там вижу значения не исходные из комбо, а те которые были изменены в процедуре №1

спасибо за разъяснение

Добрый день. В продолжении темы хотел уточнить одну деталь

Оператор Info := TInfoObj(cbTypeDevice.Items.Objects[cbTypeDevice.ItemIndex]);
создает объект Info типа TInfoObj и все поля и методы берутся с выбранного текущего элемента комбобокса. Я правильно понимаю?

понятно, спасибо