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

Question

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

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

Все ИМЕНА ФАЙЛОВ после «01_21reaaaallll» должны переместиться на одну позицию вверх, чтобы «01_21» заменило «01_21reaaallll» и т. д.

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

Answer 1

Этого можно достичь с помощьюПереименовать.

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

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

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

Вот скрипт, используемый в правиле 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.