[bogomolv]

kovdaev
Двумя страницами ранее уже приходлось писать, что
за поведение Панели Пуск отвечает ключ
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2]
"Settings"=
Настрой Панель под себя, скопируй ключ в reg-файл, а затем воспроизведи...

Sanja Alone
А зачем в твоем последнем скрипте проверка If ControlCommand ($Title,'','Button1','IsChecked','')=0 Then?

[Sanja Alone]

bogomolv

А зачем в твоем последнем скрипте проверка

Я, как и ты, настраиваю панель Пуск "реестровым" методом (причем еще на этапе установки Винды) и уже не помню, что там стоит "по умолчанию". Человек просил скрипт - я наваял, ну и влепил проверки для примера.

[kovdaev]

Ответ на вопрос зачем это нужно,
в моем случае пользователи делают что хотят, но когда начинаются проблемы зовут меня при этом, мне удобно когда скажем панель задач не убиралась с экрана, пришел запустил скрипт и все галочки стаят там где надо и не стоят где ненадо, мне кажется это удобно.
Спасибо большое за помощь.

Кто-нибудь знает, как переключить раскладку клавиатуры в En, например? Пробовал API функцию - "LoadKeyboardLayoutA"
$result = DllCall("user32.dll", "long", "LoadKeyboardLayoutA", "str", "00000409", "long", 1)
не отрабатывает.

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

[Sanja Alone]

asdfghjk

Кто-нибудь знает, как переключить раскладку клавиатуры в En, например?

Немного выше я описывал один метод - не подходит?

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

АвтоИту все равно какая в данный момент раскладка - функция Send тупо посылает указанные символы. Единственная загвоздка возникает при висящих в памяти автопереключателях раскладки (Punto Switcher, Keyboard Ninja и т.п.) - но это опять-таки не вина АвтоИт-а, а юзера, забывшего закрыть процесс подобного приложения перед применением ф-ции Send.

Спасибо за ответ. Вышеописанный метод я действительно не заметил. Однако,

функция Send тупо посылает указанные символы

Очевидно, у меня она наделена интеллектом.(В отличии от меня). Подобный код выдает русские сообщения в другой кодировке:

Код:

Run("notepad.exe")
WinWaitActive("Безымянный - Блокнот")
;Run("regedit /s en.reg")
 
Send("This is some text.", 1)
Send("{Enter}")
 
;Run("regedit /s ru.reg")
Send("Это текст на русском.")
Send("Это текст на русском.", 1)

Если запустить из-под русской раскладки, наоборот, латиницу неправильно отображает. Скрипт сохраняю в ANSI-кодировке. У кого-то правильно работает?
Закомментированные reg-файлы (переключение клавиатуры, как ты рекомендовал) не отрабатывают ни в скрипте, ни при запуске руками (точнее, отрабатывают: реестр правят, но на раскладку это не влияет). WinXP RUS SP2. Никаких автопереключателей клавиатуры нет.

[Sanja Alone]

asdfghjk

Скрипт сохраняю в ANSI-кодировке

Она же Win1251 (CP1251) - это правильно.

Run("regedit /s en.reg")

1. Любой импорт данных в реестр нужно делать при пом. ф-ции RunWait - т.е. нужно дождаться окончания операции импорта. Ф-ция Run просто запускает приложение/команду, указанную ей в кач-ве аргумента и (не дожидаясь завершения) скрипт идет дальше.
2. Ты не до конца понял описанный мной метод. Импортируя в реестр вышеуказанные ключи, ты просто включаешь возможность переключения на разные языки с пом. разных комбинаций клавиш. Но ведь для самого переключения нужно еще сделать Send('^+1') /Send('^+2')/, а не просто импортировать reg-файлик


Похоже я нашел причину твоих проблем - это Блокнот.
В Блокноте должен быть указан шрифт с кириллическим набором символов (а по ум. там Terminal - без такового). Вот нужная ветка реестра:

Код:

[HKEY_CURRENT_USER\Software\Microsoft\Notepad]
;набор символов (00000000 - западноевропейский, 000000cc - кириллический)
"lfCharSet"=dword:000000cc
;шрифт (обязательно с кириллическим набором, иначе будут кракозяблы). 
;Примеры шрифтов с кириллическим набором символов: Arial, Times New Roman, Tahoma, Lucida Console.
"lfFaceName"="Tahoma"

P.S. Ты бы не извращался с импортом reg-файликов, а юзал ф-ции АвтоИта: RegWrite/RegDelete (лишние reg-файлы неудобны в подобных ситуациях). Если лень переводить reg в АвтоИт - можешь воспользоваться моим конвертером crta.

Sanja Alone
Да, протупил я насчет Send('^+1'). Сейчас работает, только вместо точки "ю" вставляет.
Собственно, меня сей вопрос интересует только из любви к искусству. Практической необходимости в нем нет.
Хотелось бы все-таки уточнить, у кого-нибудь она (функция Send) просто "тупо посылает указанные символы "? Безо всяких раскладок клавиатуры.
Свой Блокнот я проверил - вышеописаные ключи соответствуют.

[Sanja Alone]

asdfghjk

у кого-нибудь она (функция Send) просто "тупо посылает указанные символы "?

У меня.
Для примера возьмем твой код:

Код:

Run("notepad.exe")
WinWaitActive("Безымянный - Блокнот")
Send("This is some text.")
Send("{Enter}")
Send("This is some text.", 1)
Send("{Enter}")
Send("Это текст на русском.")
Send("{Enter}")
Send("Это текст на русском.", 1)

Результат можешь посмотреть здесь


Я решил написать это в форуме, т.к. от подобной проблемы не застрахован никто. Дело в том, что на моей рабочей машине стоит WinXP SP1. Я проверил скрипт на VMWare с установленной WinXP SP2 - н-рые кириллические символы заменились кракозяблами. Логически поразмыслив о возможной причине подобного казуса, я пришел к выводу, что все дело в настройках кодовой страницы в самой Винде. Короче говоря, идем по многократно описанному в свете борьбы с кракозяблами пути, и смотрим, чтобы там было такое:

Код:

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\CodePage]
"1250"="c_1251.nls"
"1251"="c_1251.nls"
"1252"="c_1251.nls"
"1253"="c_1251.nls"
"1254"="c_1251.nls"

ВАЖНЫЙ момент! Буковки "c" должны быть в нижнем регистре ("c_1251.nls"). А у меня там были большие "C" ("C_1251.nls"). На SP1 это не влияло на ситуацию, а на SP2 стало причиной неправильного отображения н-рых (но не всех) кириллических символов в Блокноте - в других программах подобной зависимости на выявлено.

[bogomolv]

Sanja Alone

Саша, по поводу [HKLM\SYSTEM\CurrentControlSet\Control\Nls\CodePage] могу лишь процитировать очень уважаемого специалиста, советы которого ни разу не оказались сомнительными: http://forum.ixbt.com/topic.cgi?id=22:29304:2488#2488.

Добавлено, спустя 1 мин.
Извиняюсь за прямую ссылку. Посмотри ее копи-пастом...