Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / WebBrowser: автоустановка курсора в нужное поле. / 3 сообщений из 3, страница 1 из 1
31.05.2008, 23:52
    #35347405
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WebBrowser: автоустановка курсора в нужное поле.
Имеем html-страницу.
На ней есть форма с текстовыми полями.
Надо "тыкнуться" в определенное текстовое поле,чтобы сразу начать туда ввод с клавиатуры(без тыкания туда мышкой):

Своим умом пока выяснил вот что:

Код: plaintext
Set frm = Form1.WebBrowser1.Document.Forms( 0 ) 
-получили доступ к форме

Команды
Код: plaintext
1.
2.
frm.elements( 24 ).scrollIntoView
'или
frm.elements( 24 ).focus
передвигают экран так, что нужное поле(24) становится в зоне видимости-уже неплохо
Команда
Код: plaintext
frm.elements( 24 ).Select
даже выделяет текст, если он там уже есть -тепло,
но вот мигающего курсора в этом поле так пока и не получил.
...
Рейтинг: 0 / 0
01.06.2008, 01:14
    #35347446
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WebBrowser: автоустановка курсора в нужное поле.
Написал так, т.е. фокус на предыдущий элемент, кот.может его получить, а затем TAB
Код: plaintext
1.
2.
3.
frm.elements( 24 ).scrollIntoView
frm.elements( 24 ).Select
frm.elements( 21 ).focus
SendKeys "{TAB}"
но что-то уж как-то некрасиво, и бывает 1 случай из 10, что не срабатывает, лучшего от SendKeys ждать обычно и не следует.
...
Рейтинг: 0 / 0
15.05.2009, 00:44
    #35987000
theal
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WebBrowser: автоустановка курсора в нужное поле.
Что именно требуется??Для чего курсор в браузере?Цель какая?
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / WebBrowser: автоустановка курсора в нужное поле. / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]