Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Интернет и сети
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 02.12.2015, 13:01
DeZik DeZik вне форума
Прохожий
 
Регистрация: 30.01.2007
Сообщения: 6
Репутация: 10
По умолчанию WebBrowser

перехожу по адресу
Вижу страницу

Вижу
CollapsedWrap disabledLine numbers off
<DIV metrikaId_0.5974972171062272="81"><INPUT id=new_attr_123 class=s_selectTextActive value=6501011805 jQuery17202799393626251008="57" service_alias="kr_erc_all" metrikaId_0.5974972171062272="82" attr_id="123" service_id="1440" pattern="^\s*(([0-9]{10}))\s*$" default_value></DIV>


Вписал следующий код
CollapsedWrap disabledLine numbers off
A := WebBrowser1.OleObject.Document.getElementById('new _attr_123');
A.Value := '6501011805';


На странице данные визуально меняются, но не обновляются (Ajax)
если ткнуть мышью в другое поле все начинает работать.

Как победить?
Ответить с цитированием
  #2  
Старый 03.12.2015, 06:20
DeZik DeZik вне форума
Прохожий
 
Регистрация: 30.01.2007
Сообщения: 6
Репутация: 10
По умолчанию

Еще нашел

CollapsedWrap disabledLine numbers off
<SCRIPT type=text/javascript>
var ServicePaymentObj = new ServicePayment("services_main_div");
ServicePaymentObj.AddSubtypesPlan(['1','11','19','26',]);
ServicePaymentObj.AddAttrValue('123','6501011804') ;
ServicePaymentObj.MakeSubtype(0);
</SCRIPT>


как заменить код на свой через webbrowser в таком элементе&
Ответить с цитированием
  #3  
Старый 03.12.2015, 06:21
DeZik DeZik вне форума
Прохожий
 
Регистрация: 30.01.2007
Сообщения: 6
Репутация: 10
По умолчанию

Код срабатывает если ткнуть мышкой в поле WebBrowser
Как програмно мышкой ткнуть?
Ответить с цитированием
  #4  
Старый 03.12.2015, 12:43
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Ничего не понятно, но "програмно мышкой ткнуть" можно двояко: или Mouse_Event() либо sendmessage с WM_LBUTTONDOWN/UP, а может даже и трояко - браузер содержит кликабельные программно элементы (элемент.Click)
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 16:50.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025