Обсуждение темы "Обмен кнопками"

Обсуждение вопросов автоматизации Total Commander с помощью сторонних программ и скриптовых технологий.

Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер

Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

happywanderer
Нужны способы поизощрённей и побыстрее, коевыми я пользуюсь, пожалуйста:

Свойства папки – общие:
RunDll32.exe shell32.dll,Options_RunDLL 0

Свойства папки – типы файлов
RunDll32.exe shell32.dll,Control_Options 2

Свойства папки – Поиск:
RunDll32.exe shell32.dll,Options_RunDLL 2

Свойства папки – Вид:
RunDll32.exe shell32.dll,Options_RunDLL 7

Учетные записи пользователей:
RunDll32.exe shell32.dll,Control_RunDLL nusrmgr.cpl
помедленней: просто nusrmgr.cpl

не в стандартной форме, как ты назвал:
Rundll32 shell32,Control_RunDLL password.cpl
помедленней: password.cpl
Последний раз редактировалось Flasher Сб янв 22, 2011 12:45, всего редактировалось 1 раз.
happywanderer
Сообщения: 57
Зарегистрирован: Вт окт 06, 2009 21:13

Сообщение happywanderer »

Avada
Минус только, за окном ТС открывается, можно как-то исправить?
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

happywanderer
Мда, было дело, далеко не у всех проявляется. Тут ещё жаловались. Сам решал через батник и SetForegroundWindow, точный код не вспомню, потом как-то проблема ушла с отключением чего-то и где-то, либо с обновлением сервиспака. Верхний приведённый мной способ вызова тоже не канает?
happywanderer
Сообщения: 57
Зарегистрирован: Вт окт 06, 2009 21:13

Сообщение happywanderer »

Flasher писал(а): Верхний приведённый мной способ вызова тоже не канает?
Тоже самое-за окном ТС.
Странно вот окно "Свойства" :

Код: Выделить всё

TOTALCMD#BAR#DATA
cm_Properties

D:\totalcmd\Icon\Icons\93.ico
Свойства

0
1003
поверх ТС отображается.
Кстати:
Flasher писал(а):не в стандартной форме, как ты назвал:

Rundll32 shell32,Control_RunDLL password.cpl

помедленней: password.cpl
ни "помедленнее" и ни "быстро" не работает.
Аватара пользователя
Avada
Сообщения: 10541
Зарегистрирован: Пт авг 01, 2008 16:17
Откуда: Россия, Саратов

Сообщение Avada »

happywanderer писал(а):Минус только, за окном ТС открывается, можно как-то исправить?
Не знаю, я не пробовал за ненадобностью: у меня WinRoll, свёртывающий при необходимости любое окно в заголовок или уводящий на задний план.
Последний раз редактировалось Avada Сб янв 22, 2011 13:28, всего редактировалось 1 раз.
Даже самая богатая фантазия
Не представит себе наши безобразия.
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

happywanderer писал(а):Странно вот окно "Свойства" cm_Properties
1003 поверх ТС отображается.
Логично, дядя Гислер предусмотрел. :wink:
happywanderer писал(а):ни "помедленнее" и ни "быстро" не работает.
Пардон. control userpasswords2
в Висте/7 можно ещё по netplwiz
happywanderer
Сообщения: 57
Зарегистрирован: Вт окт 06, 2009 21:13

Сообщение happywanderer »

Flasher писал(а): Свойства папки – типы файлов

RunDll32.exe shell32.dll,Control_Options 2



Свойства папки – Поиск:

RunDll32.exe shell32.dll,Options_RunDLL 2



Свойства папки – Вид:

RunDll32.exe shell32.dll,Options_RunDLL 7
эти три тоже не работают.
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

happywanderer писал(а):эти три тоже не работают.
А SP какой?
happywanderer
Сообщения: 57
Зарегистрирован: Вт окт 06, 2009 21:13

Сообщение happywanderer »

SP 3
Flasher писал(а):control userpasswords2
ура заработало!!!
happywanderer
Сообщения: 57
Зарегистрирован: Вт окт 06, 2009 21:13

Сообщение happywanderer »

Flasher писал(а): control userpasswords2
Кстати тоже поверх окна ТС отображается.
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

happywanderer
Это проблема наблюдалась только с диалогом "Свойства папки" и больше ни с каким, поэтому неудивительно. Насчёт несрабатываний уже вряд ли что-то могу посоветовать. Попробуй поставь Critical Pack SP4.
Где-то я ссылку давал.. А, вот.
happywanderer
Сообщения: 57
Зарегистрирован: Вт окт 06, 2009 21:13

Сообщение happywanderer »

Flasher
Главное что "Свойства папки" и "нестандартное управление" :lol: , а на счёт SP4(блин там Internet Explorer 8, Windows Media Player 11-не хочется эти вещи в системе иметь) поставлю - отпишусь. Всё равно спасибо, что время на "извращенца" потратил. И если не секрет, где по этим командам Windows просвятится можно?
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

happywanderer писал(а):блин там Internet Explorer 8, Windows Media Player 11-не хочется эти вещи в системе иметь
При актуальных WM12 и IE9? Понимаю.
happywanderer писал(а):И если не секрет, где по этим командам Windows просвятится можно?
По волшебному слову "гугл". Например: 1, 2.
У меня-то они давно все прикручены к ТС, литература другая использовалась при этом.
happywanderer
Сообщения: 57
Зарегистрирован: Вт окт 06, 2009 21:13

Сообщение happywanderer »

Как не смешно, но у меня ещё эти "динозавры" стоят: WM10 и IE6, ввиду "старости" рабочих машин(2004г.)
Качаю, поставлю, отпишусь.

Скачал, поставил-тоже не работает(только "Свойства папки" вкладка "Общие"), может эти значения только в Висте и Семёрке подхватываются? (ну ано мне больно-то не надо, просто хочется знать - почему?)
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

happywanderer писал(а):может эти значения только в Висте и Семёрке подхватываются?
В семёрке нет вкладки "Типы файлов", для этого отдельный диалог предусмотрен.
Для вызова "Свойства папки" я использую эту кнопку. С ней тоже ТС на переднем?
При желании можешь ещё такие варианты попробовать:

Код: Выделить всё

'Открыть и выдвинуть диалог "Свойства папки" на передний план
With CreateObject("WScript.Shell")
.Exec("RunDll32.exe shell32.dll,Options_RunDLL")
.AppActivate(1588)
End With

Код: Выделить всё

'Открыть и выдвинуть диалог "Свойства папки" на передний план
With CreateObject("WScript.Shell")
.Run "RunDll32.exe shell32.dll,Options_RunDLL", 1, True
.AppActivate "Свойства папки"
End With
Ответить