Макросы для более удобного /быстрого/ переименования файлов

Здесь обсуждается всё, что касается макросов.
Post Reply
User avatar
Tim Sobolev
Posts: 729
Joined: Fri 01 Apr, 2005 14:46
Location: Украина
Has thanked: 1 time
Been thanked: 7 times

Макросы для более удобного /быстрого/ переименования файлов

Post by Tim Sobolev »

Два макроса на FML, которые использую. Второй макрос несколько громоздкий в связи с отсутствием в макроязыке массивов и возможности извлечения частей строк по regexp шаблонам.




SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

Re: Макросы для более удобного переименования файлов

Post by SeMa »

А в "# Change file name" можно ли прицепить историю переименований, как в родном ShiftF6?
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
Tim Sobolev
Posts: 729
Joined: Fri 01 Apr, 2005 14:46
Location: Украина
Has thanked: 1 time
Been thanked: 7 times

Re: Макросы для более удобного /быстрого/ переименования фай

Post by Tim Sobolev »

Code: Select all

%S=prompt("|"+%N+"|"+%X,"Изменить имя на:",0x30, %N,"HistoryChangeFileName");
PS. Поправил в скрипте, там действительно может быть полезно
User avatar
John Doe
Бюрократ
Posts: 13855
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

Re: Макросы для более удобного /быстрого/ переименования фай

Post by John Doe »

Быстрое изменения имени файла, не затрагивая расширение
Со времён двойки живёт у меня на ShiftF6 [Dialog].

Code: Select all

$If (Dlg.ItemType==DLGITEMTYPE_EDIT)
  $If (Selected && CurPos<ItemCount)
    Home ShiftEnd
  $Else
    $If (fexist(Dlg.GetValue(Dlg.CurPos,DLGGETVALUE_VALUE)))
      Home ShiftEnd CtrlShiftLeft ShiftLeft
    $End
  $End
$Else
  $AKey
$End
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

Re: Макросы для более удобного /быстрого/ переименования фай

Post by SeMa »

Tim Sobolev wrote:

Code: Select all

%S=prompt("|"+%N+"|"+%X,"Изменить имя на:",0x30, %N,"HistoryChangeFileName");
PS. Поправил в скрипте, там действительно может быть полезно
Спасибо.
А чтобы подставлялась родная ФАРовская история?
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
Tim Sobolev
Posts: 729
Joined: Fri 01 Apr, 2005 14:46
Location: Украина
Has thanked: 1 time
Been thanked: 7 times

Re: Макросы для более удобного /быстрого/ переименования фай

Post by Tim Sobolev »

"Copy". Но это будет общая история, включающая расширения
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

Re: Макросы для более удобного /быстрого/ переименования фай

Post by SeMa »

Tim Sobolev wrote:"Copy". Но это будет общая история, включающая расширения
Ясно. Спасибо.
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
Tim Sobolev
Posts: 729
Joined: Fri 01 Apr, 2005 14:46
Location: Украина
Has thanked: 1 time
Been thanked: 7 times

Re: Макросы для более удобного /быстрого/ переименования фай

Post by Tim Sobolev »

Поправил макрос переименования полей названия книги, теперь поддерживаем также имена с датами вида
"The PE format [A.Albertini] (2011-01-17).pdf"
Post Reply

Return to “Обсуждение макросов”