Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.11.2016, 09:37   #1
PaHaNjkee
Delphi 10 Seattle
Пользователь
 
Аватар для PaHaNjkee
 
Регистрация: 01.11.2010
Сообщений: 90
По умолчанию Сравнение строк в нескольких TStringList

Помогите осуществить задачу. Есть массив листов userSL [0..5] Нужно сравнить строки всех стринглистов и найти строки, присутствующие во всех листах.

Код я бы мог написать сам, алгоритм не могу придумать )
PaHaNjkee вне форума Ответить с цитированием
Старый 12.11.2016, 09:52   #2
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Берешь любой список, желательно с наименьшим количеством строк. Каждую его строку ищешь в других списках (IndexOf или Find, если сортированные списки). Как только не нашел в одном из них - дальше можно не искать. Нашел во всех - помещай в результирующий список
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 12.11.2016, 10:02   #3
PaHaNjkee
Delphi 10 Seattle
Пользователь
 
Аватар для PaHaNjkee
 
Регистрация: 01.11.2010
Сообщений: 90
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
Берешь любой список, желательно с наименьшим количеством строк. Каждую его строку ищешь в других списках (IndexOf или Find, если сортированные списки). Как только не нашел в одном из них - дальше можно не искать. Нашел во всех - помещай в результирующий список
Спасибо за идею. Я думал, будет намного сложнее
PaHaNjkee вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TStringList, загрузка строк в UTF-8 apromix Lazarus, Free Pascal, CodeTyphon 3 11.10.2016 22:53
Сравнение нескольких строк konstantin1990 Microsoft Office Excel 26 05.08.2013 23:07
сравнение строк и исключение повторов в пределах 4 строк Dariloff Microsoft Office Excel 2 20.01.2013 23:33
TStringList и дублирование строк us4us Общие вопросы Delphi 4 25.04.2011 22:30
Удаление дублирующихся строк в TStringList Alex Cones Общие вопросы Delphi 4 28.05.2010 20:33