» Total Commander (Часть 7)

Цитата:

Я прежде чем сюда запостить кучу веток обсмотрел и про сборки в том числе.

Цитата:

Это ведь первый пабликрелиз.

Давно сам автор выложил.

Цитата:

А Image — это явление особое в мире ТС.

И ниже.

Userrr

Цитата:

в 18beta 'соммаnd line' перестала работать на 'стрелках'

Что именно там перестало работать и на каких "стрелках"? И, кстати, для версии 8.0 хорошо бы не только номер беты, но и битность указывать. Лично у меня в этой бете x32 работают все клавиши-стрелки, указанные здесь. На x64 проверить не могу.

Avada 09:01 05-02-2012
Цитата:

Лично у меня в этой бете x32 работают все клавиши-стрелки, указанные здесь

Цитата:

Стрелки влево/вправо    В режимах представления "Подробный" и "Комментарии", а также в режиме пользовательских колонок: переместить курсор в командную строку

в настройках checkbox с 'соммаnd line' снят, ком. строка должна появляться автоматически, покрайней мере 15ой бете, ещё появлялась ))))
P.S. а чё есть экстремалы с ТС x64

ребята, вот у меня есть кнопка, для переименования файла по шаблону с таким скриптом VBS
~~~~~~~~~~~~~~~~~~~~~~~~~~~
Option Explicit

Dim FSO, ListFile, CurrentFile, FileName, FilePath, NewFileName

If WScript.Arguments.Count = 0 Then
MsgBox "Параметры кнопки не заданы!", vbOKOnly + vbExclamation, "Внимание!"
WScript.Quit
End If

Set FSO = CreateObject("Scripting.FileSystemObject")
Set ListFile = FSO.OpenTextFile(WScript.Arguments(0), 1)
NewFileName = WScript.Arguments(1)

Do While Not ListFile.AtEndOfStream
Set CurrentFile = FSO.GetFile(ListFile.ReadLine)
FileName = FSO.GetBaseName(CurrentFile)
FilePath = CurrentFile.ParentFolder

If Not FSO.FileExists(FilePath & "\" & NewFileName) Then
FSO.MoveFile CurrentFile, FilePath & "\" & NewFileName
Else
MsgBox "Файл """ & NewFileName & """ уже существует в папке """ & FilePath & """", vbOKOnly + vbExclamation, "Внимание!"
End If
Loop

Set FSO = Nothing
Set ListFile = Nothing
Set CurrentFile = Nothing
Wscript.Quit
~~~~~~~~~~~~~~~~~~~
как поправить скрипт, что бы переименовывал не только файлы но и директории, тупо заменить File на Folder, наверное не поможет)))

Userrr
И сейчас появляется. Никакой разницы между этими бетами нет: скрытая командная строка при перемещении в неё курсора этими самыми клавишами (а в кратком режие — с Shift) отображается и в бете 18.
Ключ SpecialCursorMovement, переопределяющий работу клавиш-стрелок, случайно не используется?

Добавлено:
Werty666
Опыт показывает, что обсуждение скриптов гораздо более результативно ведётся на подфоруме "Автоматизация" русского форума TC. Кстати, откуда взялся этот скрипт?

Avada, установил поверх 15ой, ничего не менял, откатился и всё заработало. ну его нафиг, пущай на кошках тренируется

лично я забил. Пущай на грабли кто нибудь другой наступает, меня моя 8,0б17а 64бит вполне устраивает.

Userrr

Цитата:

ну его нафиг, пущай на кошках тренируется

Увы, кошки — это именно мы, пользователи. И если ты не сможешь определить условия, при которых проявляется баг, то Гислеру его никто не зарепортит, и он так и останется неисправленным вплоть до финалки. Ты уверен, что хочешь именно этого?

Кстати, со своей стороны могу сказать, что у меня баг тоже не воспроизводится.

Userrr
Нафиг так нафиг. Желаю успехов в пожизненном использовании 15-й беты. Потому что исправлять неподтверждённый баг никто не будет. Если для его возникновения нужны какие-то специальные условия — предъявляем эти условия. Начав проверку с "чистого" TC, где все настройки, кроме скрытия командной строки, выставлены по умолчанию. Ещё раз повторяю: у меня во всех указанных режимах всё работает нормально.

ребята, а можно написать просьбу разработчику программы, с учётом того, что кроме русского, я других языков не знаю?

HROMO
Для начала эту просьбу неплохо бы сформулировать.

Avada
то есть, можно написАть здесь, а добрые люди предадут?

HROMO
Добрые люди прежде всего выяснят, что именно просят, и определят своё собственное отношение к этой просьбе. А заранее обещать передать любую просьбу нельзя. Хотя бы потому что было немало случаев, когда запрашивалось либо то, что в TC давно есть (просто спрашивающий этого не знает), либо то, чего там и быть не должно.
По-моему, предисловие несколько затянулось, пора переходить к самой просьбе.

Avada
я просто хотел убедится, туда ли я попал
похоже, что туда

итак, просьба
В диалоговом окне "Групповое переименование", если пользователь вводил какие-то данные в поля "Маска для имени файла" или "Поиск и замена", то эти данные запоминаются и их потом можно выбрать из выподающего списка, нажав на кнопку со стрелкой рядом с соответствующим полем.
Хотелось бы, чтобы такая же возможность запомнить введённые данные появилась и у поля "Маска для расширения"
Пока что, если Total Commander закрывался, приходится для переименования вводить это же расширение снова.

Avada

Цитата:

Добавлено:
Werty666
Опыт показывает, что обсуждение скриптов гораздо более результативно ведётся на подфоруме "Автоматизация" русского форума TC. Кстати, откуда взялся этот скрипт?

скрипт отсюда, лица принимающие участи в написании
Rodny
campoviy
Avada

Werty666
Так и надо было для экономии места на исходный скрипт ссылку дать — и всех делов. Думаю, Rodny необходимые разъяснения сделает. А я тогда давал рекомендации не по скрипту, а по коду кнопки.

HROMO
Говоря попросту, предлагается добавить историю ввода для маски не только имени, но и расширения. Идея понятна и, в общем, не лишена смысла. Другой вопрос, что этот функционал уже запрашивался на оффоруме как минимум с 2003 года и интереса у разработчика явно не вызвал. Судя по всему, Гислер считает это поле вспомогательным (это и в справке видно) и полностью уравнивать его функционал с полем имени не собирается. А сейчас можно вводить всё необходимое для расширения в основном поле (и всё останется в истории). Или, ещё лучше, вводить в отдельном поле, но сохранять соответствующий шаблон (список по F2, подробности в справке), загружать который потом не сильно сложнее, чем искать строку в истории.

А кто мне подскажет как заставить тотала правильно отображать кандзи/кану, вместо ряда прямоугольников ?

Avada
то, что давно запрашивается, не удивительно, не один же я так мучаюсь.
Через шаблон работает, да.
Спасибо, для меня, похоже, проблема решена.

Real_Death (19:04 05-02-2012)
Цитата:

А кто мне подскажет как заставить тотала правильно отображать кандзи/кану, вместо ряда прямоугольников ?

Поставить поддержку азиатских языков в систему.

Почему-то для браузеров не нужно ничего ставить в систему. Для мини-словарика ничего не нужно ставить.

Ребята, подскажите, какой ключ отвечает за цвет строки, которая расположена над панелями? Там, где путь указывается? Справку вроде читал, но чё-то не нашёл такого. А в сборках видел такую фишку - другой цвет. В Win 7 хрен отличишь активную и неактивную панель.

Real_Death
Я делал примерно как здесь описано. Работает.

Real_Death Тогда используйте шрифты, в которых есть иероглифы.

Ugly_Elvis

Цитата:

подскажите, какой ключ отвечает за цвет строки, которая расположена над панелями? Там, где путь указывается? Справку вроде читал, но чё-то не нашёл такого.

А справку к какой программе Вы читали? У меня отыскание искомого заняло 30 секунд, при том, что я об этих ключах ранее понятия не имел.

Структура файла wincmd.ini
[Colors]
ActiveTitle=Цвет фона в заголовке активной файловой панели.
ActiveTitleText=Цвет текста в заголовке активной файловой панели.
InactiveTitle=Цвет фона в заголовке неактивной файловой панели.
InactiveTitleText=Цвет текста в заголовке неактивной файловой панели.

nevuser
Мне стыдно.

Ugly_Elvis
В TC 8 и ключи искать уже не нужно: всё это теперь можно изменять прямо через страницу настроек "Цвета".

Avada

Ждём релиза же! Надеюсь, что это событие произойдёт всё же в 2012 году

Werty666
Как уже сказал Avada, желательно давать ссылку на источник скрипта. У меня при первом взгляде, честно сказать, и мысли не возникло, что это моё творение ;)

Новая версия:
AutoMultiRename3.vbs : [more]
Код: '==============================================================================
' Переименовать файл или папку (выделенную группу файлов или папок в разных папках)
' заданным образом без дополнительных окон и вопросов
' http://forum.ru-board.com/topic.cgi?forum=5&topic=33904&start=4120&limit=1
'
' Параметры для кнопки:
' %L "новое имя объекта"
'
' Rodny (с)
'==============================================================================
Option Explicit

Dim FSO, ListFile, CurrentLine, CurrentFile, FileName, FilePath, NewFileName

If WScript.Arguments.Count = 0 Then
MsgBox "Параметры кнопки не заданы!", vbOKOnly + vbExclamation, "Внимание!"
WScript.Quit
End If

Set FSO = CreateObject("Scripting.FileSystemObject")
Set ListFile = FSO.OpenTextFile(WScript.Arguments(0), 1)
NewFileName = WScript.Arguments(1)

Do While Not ListFile.AtEndOfStream
CurrentLine = ListFile.ReadLine
If Right(CurrentLine, 1) <> "\" Then ' Это файл
Set CurrentFile = FSO.GetFile(CurrentLine)
Else ' Это папка
Set CurrentFile = FSO.GetFolder(CurrentLine)
End If
FileName = FSO.GetBaseName(CurrentFile)
FilePath = CurrentFile.ParentFolder

If Not (FSO.FileExists(FilePath & "\" & NewFileName) Or FSO.FolderExists(FilePath & "\" & NewFileName)) Then
CurrentFile.Move FilePath & "\" & NewFileName
Else
MsgBox "Файл или папка """ & NewFileName & """ уже существует в папке """ & FilePath & """", vbOKOnly + vbExclamation, "Внимание!"
End If
Loop

Set FSO = Nothing
Set ListFile = Nothing
Set CurrentFile = Nothing
Wscript.Quit

Можно ли с какой-нибудь комбинацией клавиш, принудительно открыть нужный мне файл в листере без плагинов?

AftarJjet
В шапке же есть ссылка на все клавиши Тотала. Да, можно.