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

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

Как мне к каждому итемсу комбоБокса прицепить уникальный номер?? [D6]


Страницы:   1 2

Relaxxx ©   (2004-07-13 15:21:00) 

Я с БД выбираю список людей, например, и записываю их в КомбоБокс, но как мне к каждому челове еще и привязать уникальный номер человека???


Digitman   (2004-07-13 18:29:00) [1]


> pasha_golub


кей_прле = KEY_POLE ?!

я , ты, все мы здесь обязаны телепатировать ? вникать в кажную фразу, выкидывая далеко не ОЧЕПЯТКИ (!!) и экстраполируя "гениальную" по изобретательности мысль автора ?! ..


Digitman   (2004-07-13 18:23:00) [2]

Удалено модератором


Digitman   (2004-07-13 18:17:00) [3]

Удалено модератором


pasha_golub   (2004-07-13 18:14:00) [4]

Удалено модератором


Digitman   (2004-07-13 17:52:00) [5]

Удалено модератором


Relaxxx   (2004-07-13 17:47:00) [6]

Удалено модератором


Digitman   (2004-07-13 17:42:00) [7]

Удалено модератором


Digitman   (2004-07-13 17:40:00) [8]

Удалено модератором


Digitman   (2004-07-13 17:37:00) [9]

Удалено модератором


Sergey Vorobyev   (2004-07-13 17:36:00) [10]

Удалено модератором


Digitman   (2004-07-13 17:34:00) [11]

Удалено модератором


Digitman   (2004-07-13 17:31:00) [12]

Удалено модератором


Sergey Vorobyev   (2004-07-13 17:30:00) [13]

ShowMessage(IntToStr(Integer(ComboBox1.Items.Objects[ComBobox1.ItemIndex])))

Только на всякий случай надо проверку на ComBobox1.ItemIndex<>-1, а то опять будет ошибка


Relaxxx   (2004-07-13 17:26:00) [14]

Тю, сделал все как мне посоветовал
> KSergey ©   (13.07.04 15:29) [1]

и чтоя сделал не так, как мне записать правельно, почему выскакивает ошибка с памятью?


VMcL   (2004-07-13 17:11:00) [15]

>> Relaxxx   (13.07.04 17:03) [8]

> что я делаю не так, почему ошибка???

ComboBox1.AddItem(ListDS.DataSet.FieldByName('NAME').AsString, TObject(ListDS.DataSet.FieldByName('KEY_POLE'). AsInteger));
// ...
ShowMessage( String(ComboBox1.Items.Objects[ComBobox1.ItemIndex]))


То, за что нужно руки отрывать, выделено жирным.


Relaxxx   (2004-07-13 17:03:00) [16]

ЧТо то этот TLookupComboBox глюкнутый, мне больше подуше стандартный ComboBox. Вот только одна проблема, вот так я заполняю комбобокс

 ComboBox1.Clear;

 ListDS.DataSet.First;
 while not ListDS.DataSet.Eof do
 begin
  ComboBox1.AddItem(ListDS.DataSet.FieldByName('NAME').AsString, TObject(ListDS.DataSet.FieldByName('KEY_POLE').AsInteger));

  ListDS.DataSet.Next;
 end;
 ComboBox1.ItemIndex:=0;


вот так я записываю, а вот прочитать это кей_прле у меня не получается пишет ошибку при работе с памятью
читаю я так:
ShowMessage(String(ComboBox1.Items.Objects[ComBobox1.ItemIndex]))

что я делаю не так, почему ошибка???


Ega23   (2004-07-13 15:49:00) [17]

TLookupComboBox поможет. Только ему набор данных нужен...


evvcom   (2004-07-13 15:34:00) [18]

Вообще-то такой вопрос в базы. Кроме "обычных" компонент есть в Delphi также и DB-компоненты. Именно ими и удобнее пользоваться в таких случаях. Причем DB-компоненты "заполняются" сами, позиционируют они курсор тоже сами. Таким образом, если в таблице имеется ключ (уникальный номер), то его тоже не придется цеплять. Он будет связан курсором.


Digitman   (2004-07-13 15:32:00) [19]


> к каждому челове еще и привязать уникальный номер челове


мощно задвинул, ришпекты

станд.справка - перед носом, однакыть читать ее от корки до корки - не царское дело


KSergey   (2004-07-13 15:32:00) [20]

>  [3] ЮрийК ©   (13.07.04 15:30)

Ой, вот так я бы не стал рекомендовать делать, хотя работать, конечно, видимо будет.


Страницы:   1 2

Наверх

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