[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

Creat0R · Конфигурация компьютера

Цитата Pozia:

как вы так искали что через обычный поиск на Microsoft нашли »

Я просто в гугле набрал Windows Script Encoder и получил результат

Цитата litus:

можно подробнее »

А мой пост значит остался незамеченным?

Цитата SAOPP:

Нужно именно проделанные действия показанные на скрине если возможно, иначе ЯП будет появляться »

А если так:

Код:

_HideLangBar()

Func _HideLangBar()
    Local $hPanel = ControlGetHandle("[Class:Shell_TrayWnd]", "", "CiceroUIWndFrame1")
    WinSetState($hPanel, "", @SW_HIDE)

    RegWrite("HKEY_CURRENT_USER\Software\Microsoft\CTF\LangBar", "ShowStatus", "REG_DWORD", 3)
EndFunc

SAOPP · Отправлено: **14:51, 10-01-2009** | #**1492**

Creat0R, я так понял в ветку CTF'а прописывается значение равное значению, которое появляется после проделанных действий, которые показаны на скришоте?

Creat0R · Конфигурация компьютера

Цитата SAOPP:

в ветку CTF'а прописывается значение равное значению, которое появляется после проделанных действий, которые показаны на скришоте? »

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

SAOPP · Отправлено: **15:24, 10-01-2009** | #**1494**

Да, этого ключа недостаточно, после перезагрузке он восстанавливается в прежнюю позицию '4'.

Maza Faka · Отправлено: **15:28, 10-01-2009** | #**1495**

SAOPP
Попробуй удалить значение в реестре:

Код:

RegDelete("HKCU\Software\Microsoft\Windows\CurrentVersion\Run", "ctfmon.exe")

SAOPP · Отправлено: **15:34, 10-01-2009** | #**1496**

А дело в том, что я не хочу удалять этот монитор. Просто интересно, можно ли организовать то, что было на скриншоте...

266903582 · Отправлено: **16:58, 10-01-2009** | #**1497**

SAOPP, есть прога RegMon. Запускаем, проделываем нужные операции, выключаем слежение за реестром и смотрим, какие ключи поменялись. Дальше катаем reg файл и запускаем при необходимости.

SAOPP · Отправлено: **17:23, 10-01-2009** | #**1498**

266903582, проделайте и сообщите результат уважаемый. Данные начинания имеют корни 3х летней давности... С течением обстоятельств jameszero сделал аддон с удалением ctfmon'а вместе с punto switcher'ом. Топик об AutoIt и текущий запрос связан именно с тем, что бы добиться выполнения показанных на скриншоте действий с его помощью.

Creat0R · Конфигурация компьютера

Цитата SAOPP:

Просто интересно, можно ли организовать то, что было на скриншоте... »

Можно (но оно не надёжно):

Код:

$hLangBar = ControlGetHandle("[CLASS:Shell_TrayWnd]", "", "CiceroUIWndFrame1")
If Not IsHWnd($hLangBar) Then Exit

ControlClick("[CLASS:Shell_TrayWnd]", "", "CiceroUIWndFrame1", "Secondary", 1)
Sleep(200)
ControlSend("[CLASS:CiceroUIWndFrame]", "", "", "{UP}")
Sleep(200)
ControlSend("[CLASS:CiceroUIWndFrame]", "", "", "{ENTER}")

$sTitle = "Языковая панель"

WinWait("[CLASS:#32770;TITLE:" & $sTitle & "]", "", 2)
If WinExists("[CLASS:#32770;TITLE:" & $sTitle & "]") Then ControlClick("[CLASS:#32770;TITLE:" & $sTitle & "]", "", "Button2")

SAOPP · Отправлено: **17:40, 10-01-2009** | #**1500**

Цитата Creat0R:

но оно не надёжно »

Сейчас потестирую скриптик...

Скрипт работает как часики, спасибо, подготовлю вариант своего инсталлятора PS на поливариантность с запуском сего скрипта

В очередной раз Creat0R, спасибо!