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

Вниз

Дубликаты в списке   Найти похожие ветки 

 
00110011   (2010-02-12 15:00) [0]

как грамотнее всего проверить есть ли в списке (TStrings) дубликаты.


 
Игорь Шевченко ©   (2010-02-12 15:04) [1]

критерий грамотности не озвучен


 
00110011   (2010-02-12 15:06) [2]

наиболее быстро. Пока что для себя вижу только использование 2-го TStrings


 
И. Павел ©   (2010-02-12 15:31) [3]


> Пока что для себя вижу только использование 2-го TStrings

Зачем второй TStrings? Можно просто в два цикла:
 for i:=0 to length-1
   for j:=0 to i-1
     if строка[i]=строка[j] then дубль.

Хотя и не уверен, что этот способ достаточно быстрый.


 
Игорь Шевченко ©   (2010-02-12 15:40) [4]

00110011

TstringList.Sorted + TStringList.Duplicates := dupError + TStringList.Assign(Source)


 
00110011   (2010-02-12 15:43) [5]


> TstringList.Sorted + TStringList.Duplicates := dupError
> + TStringList.Assign(Source)


то что надо спасибо


 
Anatoly Podgoretsky ©   (2010-02-12 16:05) [6]


> то что надо спасибо

А чего же ты молчал, говорил зачем то о проверке, вместо того что бы прямо сказать.



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

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

Наверх




Память: 0.47 MB
Время: 0.241 c
2-1274517351
Delphist2
2010-05-22 12:35
2010.08.27
excel.application


15-1267636807
Kerk
2010-03-03 20:20
2010.08.27
А какая сейчас мобильная платформа самая перспективная?


15-1271910862
test
2010-04-22 08:34
2010.08.27
Spark 10.2


3-1240748319
ford
2009-04-26 16:18
2010.08.27
список несуществующих записей


4-1234276707
Serafim
2009-02-10 17:38
2010.08.27
Не получается записать во входной буфер консоли WriteConsoleInput