Что нового

[Мышь, клавиатура] Вместо двоеточия печатает точку с запятой

forbrock

Новичок
Сообщения
43
Репутация
0
Привет всем.
Столкнулся с непонятным поведением печати текста в Edit бокс.
Вот этот маленький скрипт, должен печатать путь к каталогам z:\data\base, добавил много двоеточий на вывод для наглядности результата (см. скрин).
Даже подумал добавить цикл для ожидания окна, но все равно.
Если поставить ожидание перед вводом секунды 2, то нормально выводит. Но так долго ждать не интересно.
Вопрос - почему пишет точку с запятой?
Код:
Opt('TrayIconDebug',1)
Run('d:\--\dima\bsw\bsw45.exe')
WinWaitActive('Просмтр БД')
$hWin = WinGetHandle('Просмтр БД')
ControlSend($hWin,'','','{F3}')
WinWait('Открыть')
Sleep(300)
While Not WinExists('Открыть')
   Sleep(150)
WEnd
ControlSend('Открыть','','Edit1','z::::::::::::::::::::::::::\data\base')
Exit
WinWait('Открыть','z:\data\base')
Sleep(200)
ControlClick('Открыть','','[CLASS:Button; INSTANCE:1]','left',1)
 

ildar

Осваивающий
Сообщения
252
Репутация
29
Если я правильно понял, вместо двоеточия посылает точку с запятой
попробуй вставить переменную
Код:
$zPath = "z:"
ControlSend('Открыть','','Edit1', $zPath & '\data\base')
 

ildar

Осваивающий
Сообщения
252
Репутация
29
Это конечно "танцы с бубном", если по элементно
Код:
ControlSend('Открыть','','Edit1', 'z' & ':' & '\data\base')
 

ildar

Осваивающий
Сообщения
252
Репутация
29
А попробуй вместо
Код:
ControlSend('Открыть','','Edit1','z:\data\base')

Код:
ControlSetText('Открыть','','Edit1','z:\data\base')
 
Верх