![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Добавление объектов в ComboBox (Tobject(string)) [D7, WinXP]
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]в чем проблема? почему теряются данные? Как это можно исправить? Подскажите, пожалуйста, горю.