Переименование группы файлов
| Раздел Сокровищница |
Приложение является доработкой примера из поставки Дельфи "X:\Program Files\Borland\Delphi6\Demos\ActiveX\ShellExt\" Потребность в данной программе возникла при необходимости переименовать группу выделенных файлов, с чем она прекрасно справляется.
Пример позволяете переименовывать группу файлов в проводнике Windows 95/98/ME. Поддерживается шаблонная операция [*] (звездочка). Приложение интегрируется в оболочку проводника и добавляет команду в контекстное меню. Поддерживает английский и русский язык автоматически (как мне кажется :-)).
Примеры шаблонов:
- 1. A.JPG - все выделенные файлы примут имя A.JPG, A1.JPG, A2.JPG и т.д.
- 2. T*.BMP - файлы примут имя с буквы T, а далее будет добавлено исходное имя файла.
- 3. D.* - расширение файла останется исходным, имена как (1).
Вы можете доработать алгоритм шаблонной операции, чтобы сделать его более развернутым.
Все основные операции по переименованию в следующих методах (файл ZRFile.pas): procedure TContextMenu.RenameFiles; function TContextMenu.RenameTemplate(strTemplate, strName: String): String;
Скачать проект: (200 K)
