Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.045 c
2-1275629001
Sergey2
2010-06-04 09:23
2010.08.27
Service


2-1270039311
HRustBB
2010-03-31 16:41
2010.08.27
Как изменить высоту заголовка формы


6-1216719811
GraySE
2008-07-22 13:43
2010.08.27
TWebBrowser. Доступ к заголовкам.


3-1243316202
Naruto
2009-05-26 09:36
2010.08.27
UPDATE в SQLite


2-1269966073
Dr. Genius
2010-03-30 20:21
2010.08.27
Формат даты вида "30 марта 2010 года"




   Наверх