пакетное переименование файлов - Общие вопросы Delphi

Денис9 · 19.01.2013, 14:16

приветствую, мне требуется создать программу по такому алгоритму, но вообще не в курсе с чего начинать, так как полный ноль в этом деле. прошу помочь сделать первые шаги

Stilet · 19.01.2013, 14:55

Чет я ниразу не понял алгоритм...

Денис9 · 19.01.2013, 15:03

короче, в папке 1 у меня лежит примерно 10000 изображений, и в папке 2 столько же с такими же изображениями, но с разными именами и другим расширением. мне нужно чтобы программа создавала такую же папку (папка 3), как и папка 1, но имена всех файлов были как в папке 2.

evg_m · 19.01.2013, 15:24

Цитата:

столько же с такими же изображениями,

т.е. такое же изображение(рисунок)? Программа должна уметь определять идентичность рисунков (в т.ч. разных размеров) ?

EUGY · 19.01.2013, 15:26

Алгоритм-то как раз понятен, смущает отсутствие принципа сравнения изображений разного разрешения. Для этого сравнения надо будет приводить изображение большего разрешения к меньшему и делать попиксельное сравнение. Сомневаюсь, что они будут идентичными.

Человек_Борща · 19.01.2013, 15:48

Есть такое расширение оболочки Windiows - FileMenuTools. Там есть все что вам надо и даже больше.

Денис9 · 19.01.2013, 15:49

Цитата:

Сообщение от evg_m

т.е. такое же изображение(рисунок)? Программа должна уметь определять идентичность рисунков (в т.ч. разных размеров) ?

в том то и дело, что программа НЕ ДОЛЖНА это уметь... мне требуется только переименование. программа должна работать с помощью шаблона, в шаблон я записываю что куда встанет. если у меня 6 изображений: создаю шаблон примерно выглядиший так :
"папка 1" - 730.png \\\ "папка 2" - anim_0650.png = "папка 3" - 730.png
"папка 1" - 731.png \\\ "папка 2" - anim_0651.png = "папка 3" - 731.png
"папка 1" - 732.png \\\ "папка 2" - anim_0652.png = "папка 3" - 732.png
"папка 1" - 755.png \\\ "папка 2" - anim_0658.png = "папка 3" - 755.png
"папка 1" - 761.png \\\ "папка 2" - anim_0661.png = "папка 3" - 761.png
"папка 1" - 762.png \\\ "папка 2" - anim_0665.png = "папка 3" - 762.png

Serge_Bliznykov · 21.01.2013, 00:02

я не знаю, зачем Вам такое безумное переименование (например, удаление любого файла из папки 2 приведёт к полному изменению результата в папке 3), но, раз Вы просите, значит, Вам оно нужно.

Так же не забудьте, что задача имеет малейший здравый смысл (который от меня, например, ускользает напрочь) только в том случае, если имена файлов в папке 1 и папке 2 сортируются по какому-то правилу (допускаю, что по имени файла).

Алгоритм такой. читаем все имена файлов из папки 1 в структуру в памяти (например, TStringList). читать можно любым способом. я бы вспользовался FindFirst/FindNext
сортируем имена файлов как надо.
читаем все имена файлов из папки 2 в другую (аналогичную структуру). Так же сортируем их.
Дальше просто.
Цикл по всем элементам папки (первой или второй - не суть важно, количество файлов, строго говоря, должно быть одно и то же)
в цикле берём i-e имя файла из структуры, хранящей имена 2-й папки, копируем в папку 3, с именем, соответствующим i-му имени 1-й папки.
профит.

19.01.2013, 14:55	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Чет я ниразу не понял алгоритм... I'm learning to live...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Переименование файлов	Alergen2	Microsoft Office Access	1	01.11.2011 13:57
Excel переименование файлов в папке макросом	RamZes1715	Microsoft Office Excel	7	20.10.2011 16:39
Переименование всех файлов в каталоге	calugin	PHP	3	14.05.2011 12:05
Переименование файлов в папке.	mr_Smitt	Общие вопросы Delphi	1	28.09.2009 17:20
Переименование группы файлов	Meh	Общие вопросы Delphi	2	28.07.2009 12:31

19.01.2013, 15:03	#3
Денис9 Регистрация: 19.01.2013 Сообщений: 3	короче, в папке 1 у меня лежит примерно 10000 изображений, и в папке 2 столько же с такими же изображениями, но с разными именами и другим расширением. мне нужно чтобы программа создавала такую же папку (папка 3), как и папка 1, но имена всех файлов были как в папке 2.

19.01.2013, 15:26	#5
EUGY Форумчанин Регистрация: 11.07.2010 Сообщений: 914	Алгоритм-то как раз понятен, смущает отсутствие принципа сравнения изображений разного разрешения. Для этого сравнения надо будет приводить изображение большего разрешения к меньшему и делать попиксельное сравнение. Сомневаюсь, что они будут идентичными.

19.01.2013, 15:48	#6
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,434	Есть такое расширение оболочки Windiows - FileMenuTools. Там есть все что вам надо и даже больше.

21.01.2013, 00:02	#8
Serge_Bliznykov Старожил Регистрация: 09.01.2008 Сообщений: 26,229	я не знаю, зачем Вам такое безумное переименование (например, удаление любого файла из папки 2 приведёт к полному изменению результата в папке 3), но, раз Вы просите, значит, Вам оно нужно. Так же не забудьте, что задача имеет малейший здравый смысл (который от меня, например, ускользает напрочь) только в том случае, если имена файлов в папке 1 и папке 2 сортируются по какому-то правилу (допускаю, что по имени файла). Алгоритм такой. читаем все имена файлов из папки 1 в структуру в памяти (например, TStringList). читать можно любым способом. я бы вспользовался FindFirst/FindNext сортируем имена файлов как надо. читаем все имена файлов из папки 2 в другую (аналогичную структуру). Так же сортируем их. Дальше просто. Цикл по всем элементам папки (первой или второй - не суть важно, количество файлов, строго говоря, должно быть одно и то же) в цикле берём i-e имя файла из структуры, хранящей имена 2-й папки, копируем в папку 3, с именем, соответствующим i-му имени 1-й папки. профит.