Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Добавление объектов в ComboBox (Tobject(string)) [D7, WinXP]


Страницы:   1 2

Nike85 ©   (2007-11-02 15:25:00) 

Здравствуйте!
Не могу понять, чем вызвана следующая проблема:
читаю из бд данные - имя записи (name) и строковое представление идентификатора (anrec), добавляю их в расположенный на форме комбобокс (имя - как строку, идентификатор - в список объектов). Однако при дальнейшем выводе идентификатора - выходит абракадабра (пустое сообщение - такое ощущение, что где-то утечка памяти).
Код ниже:

//Чтение данных:
//s1,s2: string;
 while not tempQuery1.Eof do
   begin
   s1:=tempQuery1.FieldByName('name').AsString;
   s2:=tempQuery1.FieldByName('anrec').AsString;
   ShowMessage(s2);
   cmbStatus.Items.AddObject(s1,Tobject(s2));
   TempQuery1.Next;
   end;



//Вывод данных:
ShowMessage(string(cmbStatus.Items.Objects[cmbStatus.ItemIndex]));


Reindeer Moss Eater   (2007-11-02 15:34:00) [21]

После заполнения списка с объектами, как только выходим за пределы процедуры и все неявные строки (TField.AsString) выходят за пределы видимости и умирают, все объекты в списке начинают указывать на мусор.


Kolan   (2007-11-02 15:29:00) [22]

А не заюзать ли тебе TDBLookUpComboBox?


Nike85   (2007-11-02 15:27:00) [23]

в чем проблема? почему теряются данные? Как это можно исправить? Подскажите, пожалуйста, горю.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо