Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

ComboBox1.Items.Delete(??????);   Найти похожие ветки 

 
просто Я ©   (2004-04-20 21:29) [0]

Имеется ComboBox, туда в цикле добавляю записи

while not Table1.Eof do
begin
ComboBox1.Items.Add(DM.ADOTable1Name.AsString);
ADOTable1.Next;
end;

На выходе получается список, где много повторяющихся записей:
мыло
шило
мыло
мыло
шило
Ну очень бы хотелось, чтобы было просто
мыло
шило
Понимаю что в цикле нужно проверить список на наличие одинаковых записей, а реализовать не получается, даже мою реализацию привести стыдно!?


 
Юрий Федоров ©   (2004-04-20 21:32) [1]

if ComboBox1.Items.IndexOf(DM.ADOTable1Name.AsString) = -1 then
 ComboBox1.Items.Add(DM.ADOTable1Name.AsString);


 
просто Я ©   (2004-04-20 21:41) [2]

Юрий Федоров ©   (20.04.04 21:32) [1]
IndexOf-?


 
Юрий Федоров ©   (2004-04-20 21:46) [3]

Добавляем только если такой еще нет


 
просто Я ©   (2004-04-20 21:56) [4]

Блин, ответ был так близко, а я в цикл полез.
Пасиба.



Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.076 c
1-1082076924
Читатель
2004-04-16 04:55
2004.04.11
Есть ли паковщики exe-файлов на Дельфи ? Или что нужно знать,


3-1079095883
Девушка
2004-03-12 15:51
2004.04.11
SQL Server 2000 - удаление таблиц, идентификатор записей


7-1080053468
dmytro
2004-03-23 17:51
2004.04.11
Запуск от имени


1-1079720907
killer
2004-03-19 21:28
2004.04.11
Программа и панель задачь


3-1081396835
Серж
2004-04-08 08:00
2004.04.11
Как округлить число в процедуре Interbase?