Главная страница
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.052 c
2-1145808019
mctarik
2006-04-23 20:00
2006.05.14
Вызов процедуры в MessageBox


2-1145764900
Der Nechk@ssoff
2006-04-23 08:01
2006.05.14
F1Book


15-1145445477
s_pavell
2006-04-19 15:17
2006.05.14
WAP шифрование


3-1142926431
Jane
2006-03-21 10:33
2006.05.14
Использование в коннектах через BDE user name заданных кириллицей


1-1144400913
Kolan
2006-04-07 13:08
2006.05.14
Как передать в функцию массив записей использия Variant?