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

Вниз

Проверка на наличие элемента в ListBox   Найти похожие ветки 

 
AlexanderMS ©   (2006-04-24 19:24) [0]

Помогите, пожалуйста! Можно ли проверить наличие элемента в ListBox? В списке - около 7 тысяч элементов, и было бы нерационально перебирать их все. Список неупорядочен. Может, существует какая-нибудь функция?


 
KilkennyCat ©   (2006-04-24 19:28) [1]

неупорядочный список 0- только тупым перебором. Если упорядочить - то будет намного проще....


 
AlexanderMS ©   (2006-04-24 19:35) [2]

Мне нельзя допустить наличие двух и более одинаковых элементов в списке после переименования одного из элементов. А делать это придётся часто - такая уж программа! Есть какой-нибудь способ?


 
EvS ©   (2006-04-24 19:45) [3]

Свойство Items имеет тип TStrings
Класс TStrings имеет метод IndexOf


 
Гаврила ©   (2006-04-24 20:06) [4]

Если у тебя поиск с помощью "indexOf" занимает, на твой взгляд, неприемлимое время ,и если список дейстувительно должен быть неупорядоченный, то советую держать второй невидимый список - сортированный, и наличие проверять в нем, содержимое дублировать.
Неплохой класс для этого - THashedStringList


 
KilkennyCat ©   (2006-04-25 11:14) [5]


>  [3] EvS ©   (24.04.06 19:45)
> Свойство Items имеет тип TStrings
> Класс TStrings имеет метод IndexOf


function TStrings.IndexOf(const S: string): Integer;
begin
 for Result := 0 to GetCount - 1 do
   if CompareStrings(Get(Result), S) = 0 then Exit;
 Result := -1;
end;


 
AlexanderMS ©   (2006-04-25 19:01) [6]

Большое спасибо



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

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

Наверх




Память: 0.48 MB
Время: 0.043 c
3-1142418789
Капибара (бр)
2006-03-15 13:33
2006.05.14
FB ругается на поле с именем Value


2-1146167624
Alecs
2006-04-27 23:53
2006.05.14
Excel Delphi работа с уже открытым файлом


2-1145863014
Неуч
2006-04-24 11:16
2006.05.14
Передвинуть курсор в мемо


2-1145838896
Bratskiy
2006-04-24 04:34
2006.05.14
Резервное копирование базы данных


15-1144871576
ArtemESC
2006-04-12 23:52
2006.05.14
Великая мистификация...