Как переместить несколько имен файлов?

Question

На работе мне пришлось переименовать 650 файлов. Оказывается, я пропустил один файл посередине. Поэтому я добавил его, но теперь мне нужно взять имена из последующих файлов в тот, который я добавил, и переместить их все на 1 "слот".

Вот скриншот:

Все ИМЕНА ФАЙЛА после "01_21reaaaallll" должны переместиться на один слот вверх, поэтому "01_21" заменит "01_21reaaallll" и так далее.

Есть ли способ сделать это? Просто переместите имена файлов, так что мне не нужно переименовывать все заново?

Answer 1

Это может быть достигнуто с ReNamer.

Так называемый "сдвиг" новых имен достигается путем добавления правила переименования с помощью скрипта (ниже). Чтобы это работало, файлы должны быть отсортированы по столбцу Имя, поскольку файлы обрабатываются последовательно (сверху вниз). Первый файл имеет префикс случайного символа, поэтому он не мешает следующему файлу.

Вот как это будет выглядеть:

Примечание. Вы можете игнорировать предупреждение проверки. Он просто говорит вам, что целевой файл уже существует, но последовательное переименование все равно будет работать, как и ожидалось.

Вот скрипт, используемый в правиле PascalScript в ReNamer:

var
  Temp, Previous: WideString;
begin
  if Previous = '' then
  begin
    Previous := FileName;
    FileName := '@' + FileName;
  end
  else
  begin
    Temp := FileName;
    FileName := Previous;
    Previous := Temp;
  end;
end.