View previous topic :: View next topic |
Author |
Message |
angry_dog

Joined: 21 Nov 2009 Posts: 143 Location: Питер
|
(Separately) Posted: Fri Apr 01, 2011 14:37 Post subject: Сбросить ассоциации и значки в default в Total Commander |
|
|
После установки MPlayer'a к файлам .dat привязались ассоциации плеера. После неудачных экспериментов по удалению ассоциации, тип файлов dat был удалён и создан заново пустой. В свойствах файла всё стало правильно, в эксплорере отображается тоже правильно, а Total Commander всё равно отображает значок MPlayer'a.
Давно обратил внимание что в эксплорере и Total Commander'e значки отображаются по разному. Отчего это зависит? Где можно отредактировать показ значков в Total Commander?
Как, в данной ситуации сбросить отображение значков в default, как в проводнике? |
|
Back to top |
|
 |
Flasher

Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Fri Apr 01, 2011 18:21 Post subject: |
|
|
angry_dog wrote: | Где можно отредактировать показ значков в Total Commander? | Ничего не напоминает? |
|
Back to top |
|
 |
angry_dog

Joined: 21 Nov 2009 Posts: 143 Location: Питер
|
(Separately) Posted: Fri Apr 01, 2011 18:32 Post subject: |
|
|
Flasher
если Вы про команду cm_InternalAssociate, то пробовал. Не получилось. Но, так понимаю, что там как и в експлорере, можно переназначить ассоциации и значки. Мне нужно отвязать и не привязывать никакое приложение. Соответственно и значок должен быть пустым |
|
Back to top |
|
 |
Flasher

Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Fri Apr 01, 2011 18:52 Post subject: |
|
|
angry_dog wrote: | Соответственно и значок должен быть пустым | Дефолтный - это не обязательно пустой, а ассоциированный некогда системой. Система какая - XP, Виста, 7 ? |
|
Back to top |
|
 |
angry_dog

Joined: 21 Nov 2009 Posts: 143 Location: Питер
|
(Separately) Posted: Fri Apr 01, 2011 18:54 Post subject: |
|
|
Flasher wrote: | Система какая? XP, Виста, 7 ? |
семёрка |
|
Back to top |
|
 |
Flasher

Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Fri Apr 01, 2011 19:23 Post subject: |
|
|
А нужно именно пустой значок? Похоже тут придётся через реестр.
Например, сбросить ассоциацию для dat c помощью vbs:
Code: | With CreateObject("WScript.Shell")
.RegWrite "HKCR\.dat\(Default)","","REG_SZ"
End With |
Если нужно переназначить, то в 7-ке это делается в диалоге
"Сопоставление типов файлов и протоколов конкретным программам", вызываемом из диалога "Программы по умолчанию": shell:::{17cd9488-1228-4b2f-88ce-4298e93e0966}
Ежели необходимо показывать только значки, воспринимаемые самим ТС, то смотрим справку, там всё написано. |
|
Back to top |
|
 |
angry_dog

Joined: 21 Nov 2009 Posts: 143 Location: Питер
|
(Separately) Posted: Fri Apr 01, 2011 22:26 Post subject: |
|
|
Решил так. Привязал MPlayer к dat, нашёл в реестре не просто dat (HKEY_CLASSES_ROOT\.dat), a dat со значением MPlayer (HKEY_CLASSES_ROOT\MPlayer.dat) и удалил этот параметр. Total Commander стал отображать пустой значок. |
|
Back to top |
|
 |
Flasher

Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Fri Apr 01, 2011 22:28 Post subject: |
|
|
angry_dog
Скрипт один раз выполнить, а в реестр лезть её надо. Смысл?
Про лишнюю привязку вообще молчу.. |
|
Back to top |
|
 |
angry_dog

Joined: 21 Nov 2009 Posts: 143 Location: Питер
|
(Separately) Posted: Fri Apr 01, 2011 22:31 Post subject: |
|
|
Спасибо Вам, Flasher за помощь. Второй раз выручаете |
|
Back to top |
|
 |
Flasher

Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Fri Apr 01, 2011 22:34 Post subject: |
|
|
Пожалуйста. Если надо удалить, а не очистить, то так:
Code: | With CreateObject("WScript.Shell")
.RegDelete "HKCR\.dat\"
End With | Эффект будет тот же. Воссоздать всегда можно с помощью соотв. установщика
или в диалоге "Файловые ассоциации" (cm_Associate).
Можно ещё, в принципе, такую кнопку использовать: Code: | TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Scripts\DeleteFileAssociation.vbs
%E
wcmicons.dll,69
Удалить системную ассоциацию для расширения файла под курсором |
скрипт для неё, соответственно, будет таким:
Code: | With CreateObject("WScript.Shell")
on Error resume Next
.RegDelete("HKCR\."+WScript.Arguments(0)+"\")
.RegDelete("HKCR\"+WScript.Arguments(0)+"_file\")
.RegDelete("HKCR\"+WScript.Arguments(0)+"file\")
End With |
|
|
Back to top |
|
 |
|