Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Отключение "Define colors by type" с кнопки
Goto page 1, 2  Next
 
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander printer-friendly view
View previous topic :: View next topic  
Author Message
prog_san



Joined: 29 Sep 2007
Posts: 277
Location: Пенза

Post (Separately) Posted: Fri May 29, 2009 10:13    Post subject: Отключение "Define colors by type" с кнопки Reply with quote

Хотелось бы реализовать такую вещь как - Отключение "Define colors by type" с кнопки на панели приборов или с помощью клавиатурных сочетаний. Такой команды в списке команд TotalCommander не нашел Sad. Подскажите, как с минимальными затратами реализовать это без перезагрузки

 !  Моторокер:
Нарушение п.9 правил форума.
Тема перенесена в Автоматизацию.
Форум Советы - для советов, а не для вопросов.
Back to top
View user's profile Send private message
CaptainFlint



Joined: 14 Dec 2004
Posts: 6151
Location: Москва

Post (Separately) Posted: Fri May 29, 2009 12:12    Post subject: Reply with quote

Насколько я понимаю, такое только макросом, который откроет диалог, нажмёт нужную галочку и сохранит изменения.
_________________
Почему же, ё-моё, ты нигде не пишешь "ё"?
Back to top
View user's profile Send private message
Worros



Joined: 19 Jan 2007
Posts: 1123

Post (Separately) Posted: Fri May 29, 2009 16:17    Post subject: Reply with quote

Кстати мне бы тоже очень понравился встроенный функционал. Если будете реквестить, охотно поддержу.
_________________
педофилия, каннибализм, бетономешалка !!!
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10236
Location: Россия, Саратов

Post (Separately) Posted: Fri May 29, 2009 18:20    Post subject: Reply with quote

Вполне разумное предложение, я тоже поддерживаю.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
D1P



Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси

Post (Separately) Posted: Fri May 29, 2009 19:39    Post subject: Reply with quote

Поддерживаю. С двумя сотнями шаблонов на подсветку тотал работает ощутимо медленнее, а нужны они не всегда.
_________________
База знаний о Total Commander
Блог
Back to top
View user's profile Send private message
prog_san



Joined: 29 Sep 2007
Posts: 277
Location: Пенза

Post (Separately) Posted: Fri Jul 24, 2009 09:49    Post subject: Reply with quote

Написал script. Для работы необходим TCScript.Helper
Code:

' Отключение\включение ракраски файлов в зависимоти от типа
' prog_san  2009
Option Explicit
Dim TCS
Set TCS = CreateObject("TCScript.Helper")

' Перейти на вкладку управления настройками цветов
TCS.SendCommand(494)
' Перейти к галочке отключения раскраски файлов, изменить ее значение
TCS.SendKeystroke "{TAB 14} {SPACE}"
' Закрыть диалоговое окно
TCS.SendKeystroke "{ENTER}"

Set TCS = Nothing
Wscript.Quit()

_________________
Errare humanum est
Back to top
View user's profile Send private message
tigb



Joined: 26 Nov 2006
Posts: 4
Location: Тверь

Post (Separately) Posted: Sat Oct 31, 2009 10:50    Post subject: включение/отключение раскраски Reply with quote

Доброго времени суток!

Можно ли на кнопку навесить включение/отключение раскраски строк?

Причина: раскраска помогает в работе (и уже привычна), но порой глаза устают и, если нет необходимости, хотелось бы её отключать.

Раньше менял цвет 2-го фона через ini-файл, затем создал 2 схемы в
IMPOMEZIA TC Color Presets (с раскраской и без), но хотелось бы переходить одной кнопкой.
 !  Avada:
Перемещено в уже существующую тему.
Back to top
View user's profile Send private message
prog_san



Joined: 29 Sep 2007
Posts: 277
Location: Пенза

Post (Separately) Posted: Sat Oct 31, 2009 12:06    Post subject: Reply with quote

Я также задавался этим вопросом. Написал решение в виде скрипта, который реализуют вход в окно свойств TotalCommander и отжатие(нажатие) галочки включения(отключения) расскраски - решение на данный момент наиболее приемлимое. Скрипт можно повесить как на нопку, так и на сочетание клавиш.

http://forum.wincmd.ru/viewtopic.php?t=12346
_________________
Errare humanum est
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10236
Location: Россия, Саратов

Post (Separately) Posted: Sat Oct 31, 2009 13:43    Post subject: Reply with quote

prog_san
Скриптом пользуюсь с момента опубликования. На обоих домашних компах работает безукоризненно. На рабочем при идентичных (вроде бы) настройках TC под той же Windows XP по тому же самому скрипту мелькает окошко со страничкой настроек "Цвета", но переключения опции не происходит. Прочие vbs-скрипты работают там нормально. В чём может быть дело?
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Tol!k



Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас

Post (Separately) Posted: Sat Oct 31, 2009 15:03    Post subject: Reply with quote

Avada wrote:
мелькает окошко со страничкой настроек "Цвета", но переключения опции не происходит
Попробуй добавить строку
Set TCS = CreateObject("TCScript.Helper")
TCS.Pause = 100
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10236
Location: Россия, Саратов

Post (Separately) Posted: Sat Oct 31, 2009 15:45    Post subject: Reply with quote

Tol!k
Спасибо, в понедельник попробую.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Tol!k



Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас

Post (Separately) Posted: Sat Oct 31, 2009 16:02    Post subject: Reply with quote

Скрипт будет неправильно работать если используется инверсный курсор или инверсное выделение.

Универсальный вариант будет выглядеть так:
' Перейти к галочке отключения раскраски файлов, изменить ее значение
TCS.SendKeystroke "+{TAB 5} {SPACE}"
Back to top
View user's profile Send private message
prog_san



Joined: 29 Sep 2007
Posts: 277
Location: Пенза

Post (Separately) Posted: Mon Nov 02, 2009 10:30    Post subject: Reply with quote

Tol!k wrote:
Скрипт будет неправильно работать если используется инверсный курсор или инверсное выделение.

Точно. Важный момент. Учту. Спасибо за доработку
_________________
Errare humanum est
Back to top
View user's profile Send private message
sa



Joined: 29 Apr 2009
Posts: 2563

Post (Separately) Posted: Mon Nov 02, 2009 13:34    Post subject: Reply with quote

Tol!k wrote:
Универсальный вариант будет выглядеть так:
' Перейти к галочке отключения раскраски файлов, изменить ее значение
TCS.SendKeystroke "+{TAB 5} {SPACE}"

Можно ещё короче:
TCS.SendKeystroke "+{TAB 5} "
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10236
Location: Россия, Саратов

Post (Separately) Posted: Tue Nov 03, 2009 19:29    Post subject: Reply with quote

Tol!k wrote:
TCS.SendKeystroke "+{TAB 5} {SPACE}"

Работает. На двух домашних компах.
А на рабочем компе ни один из предложенных советов так к успеху и не привёл. Sad

sa wrote:
Можно ещё короче:
TCS.SendKeystroke "+{TAB 5} "

Не работает нигде.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander All times are GMT + 4 Hours
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group