Показать сообщение отдельно
  #2  
Старый 22.12.2014, 07:31
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Есть предположение (по drkb) что можно сначало распарсить данный фрагмент до
Код:
var
Document: IHtmlDocument2;
V: Variant;
...
V[0] :='<a href="/wps/myportal/ibank/!ut/p/a1/hY5LC4JAFIV_UOC9vnU5KvmocKd2NzIDZqbNhErRv0-jbXV2B76Pc4CgApL83rV87pTkw9rJqZHFlr7LMcu3hYEs1HPdNgoT0VyA4wp8CcN_fgn0RsKYJZa7XxzLMzc4CgApL83rV87pTkw9rJqZHFlr7LMcu3hYEs1HPdNgoT0VyA4wp8CcN_fgn0RsKYJZa7XxzLMCi92XL8Fr2BY!/dl5/d5/L2dJQSEvUUt3QS80SmlFL1o2XzBBRzQxS08wSk9GVjIwQUMxTzE1MlYzMDYw/">Run</a>';
а затем выполнить
Код:
...
Document := WebBrowser1.Document as IHtmlDocument2;
Document.Writeln(PSafeArray(TVarData(v).VArray));
...
WebBrowser1.Navigate...
...
ну или тогда симульнуть клик посредством SendInput(MouseInput)...
Ответить с цитированием