Показать сообщение отдельно
  #3  
Старый 13.09.2012, 20:22
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от k_slava11
Здравствуйте, по работе столкнулся с такой проблемой: нужно из 10 папок в которых 100000 файлов отобрать определенные файлы по назвах. В некоторых папках есть одиннаковые файлы, тоесть файлы, которые изменяльсь. В список мемо я вывел все файлы, теперь нужно отобрать одинаковые имена, сравнить по дате создания и скопировать самые последние.
Алгоритм примерно такой:
1) сортируешь список по имени файла (без пути, но путь не теряешь),
2) проходишься в цикле по списку и если встречаются подряд 2 одинаковых имени сравниваешь их даты и более старый удаляешь из списка,
3) и наконец опять проходишься в цикле по списку и копируешь все файлы из него в папку назначения.
В принципе пункты 2 и 3 можно объединить в один цикл вместо двух.
Ответить с цитированием