Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
Delphi WebBrowser не работает [ENTER] |

01.07.2006, 12:01
|
|
Участник форума
Регистрация: 30.01.2006
Сообщений: 176
Провел на форуме: 607472
Репутация:
29
|
|
Delphi WebBrowser не работает [ENTER]
Вопрос использую компонент WebBrowser -полный аналог IE.
после настройки его , модернизации и всего прочего всё отлично работает тот же ie , но в IE после нажатия кнопки Еnter на некоторых сайтах срабатывает кнопка пост , допустим на www.yandex.ru вы нажимаете Enter и у вас срабатывает кнопка найти, но в WebBrowser после нажатия на Enter такого почему-то не происходит?!
ПОЧЕМУ?КТО МОЖЕТ ПОДСКАЗАТЬ КАК ЭТУ ПРОБЛЕМУ РЕШИТЬ?
|
|
|

01.07.2006, 12:03
|
|
Участник форума
Регистрация: 06.03.2006
Сообщений: 122
Провел на форуме: 709545
Репутация:
72
|
|
Нужно фокус по дефаулту на браузер поставить.
|
|
|

01.07.2006, 12:53
|
|
Участник форума
Регистрация: 30.01.2006
Сообщений: 176
Провел на форуме: 607472
Репутация:
29
|
|
Нужно фокус по дефаулту на браузер поставить.
а как это сделать?
|
|
|

01.07.2006, 13:17
|
|
Участник форума
Регистрация: 21.03.2006
Сообщений: 117
Провел на форуме: 629074
Репутация:
137
|
|
Кнопки обрабатывать нужно
|
|
|

01.07.2006, 13:33
|
|
Участник форума
Регистрация: 30.01.2006
Сообщений: 176
Провел на форуме: 607472
Репутация:
29
|
|
ну вот на примере отработки кноки "Найти!" на сайте www.ya.ru
делаем загрузку www.ya.ru по созданию формы:
WebBrowser1.Navigate('www.ya.ru');
дальше делаем кнопку на форме:
procedure TForm1.Button1Click(Sender: TObject);
var
ovElements: OleVariant;
i: Integer;
begin
ovElements := WebBrowser1.OleObject.Document.forms.item(0).eleme nts;
for i := 0 to (ovElements.Length - 1) do
if (ovElements.item(i).tagName = 'INPUT') and
(ovElements.item(i).type = 'SUBMIT') and
(ovElements.item(i).Value = 'Recent Charges') then
ovElements.item(i).Click;
end;
Кнопка "Найти" имеет type="submit вроде бы всё нормально, но не работет? !  почему?
|
|
|

01.07.2006, 16:11
|
|
Участник форума
Регистрация: 06.03.2006
Сообщений: 122
Провел на форуме: 709545
Репутация:
72
|
|
Т.е. ты хочешь, чтобы у тебя на форме были собственные edit (поля для ввода) и кнопка "поиск", при нажатии на которую, происходил поиск на www.ya.ru по шаблону, задонному в твоем edit'е?
procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.Navigate('http://www.yandex.ru/yandsearch?rpt=rad&text='+edit1.text); // точно не помню, как на делфи строки соединять 
end;
Оно?
|
|
|

01.07.2006, 21:57
|
|
Участник форума
Регистрация: 30.01.2006
Сообщений: 176
Провел на форуме: 607472
Репутация:
29
|
|
lo0 нет, нет, нет  я не это хочу!
Если вы в обычном IE зайдете загрузите www.ya.ru в строке для ввода слова для поиска вбьёте его и нажмете на клавиатуре кнопку Enter , тогда у Вас произведеться поиск на данной страничьке.
Но если же вый зайдете на сайт www.ya.ru через компоненть TWebBrowser введете на стриничьке слово для поиска и нажмете на клавиатуре кнопку Enter , то ничего не произойдет  ПОЧЕМУ Я НЕ ЗНАЮ?! и как сделать так чтобы в TWebBrowser , кнопка Enter работала как в IE?
|
|
|

02.07.2006, 00:34
|
|
Познающий
Регистрация: 19.01.2006
Сообщений: 58
Провел на форуме: 108297
Репутация:
6
|
|
тогда вопрос, а если на страничке несколько форм для отправки, как же тогда искать нужную. Я так понял ты хочешь сделать универсальный метод
|
|
|

02.07.2006, 01:38
|
|
Участник форума
Регистрация: 30.01.2006
Сообщений: 176
Провел на форуме: 607472
Репутация:
29
|
|
asm33 да нет не надо никаких универсальных обычное нажатие кноки ентер - почму в ie Оно работает , а в компоненте нет?!
Нужно сделать чтобы просто нажалась кнопка найти на www.ya.ru нажалась по нажатию кноки enter.
Как это сделать кто нибуть знает?!
|
|
|

02.07.2006, 02:58
|
|
Banned
Регистрация: 26.07.2005
Сообщений: 240
Провел на форуме: 1266236
Репутация:
75
|
|
для начала нужно сделать первоночально твой edit активным , думаю с этим проблем нету, а потом просто создай процедуру(там есть специальная точно названия не помню) для компонента edit и ты получиш результат...
зы если я неправильно понял то отпишись
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|