Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.10.04;
Скачать: CL | DM;

Вниз

Эмуляция клика по ссылке   Найти похожие ветки 

 
XcCCC   (2009-08-01 11:23) [0]

Как эмулировать клик мышью по ссылке, в html коде выглядит как
<a href="" onclick="delete похоже это просто скрипт запускающий удаление ?


 
sniknik ©   (2009-08-01 11:29) [1]

зачем эмулировать? просто вызвать этот скрип и все.


 
XcCCC   (2009-08-01 11:35) [2]

как? оболочка IE в форме Form1
повешены кнопки вперед, назад, перейди и TEdit адрес
получить адрес ссылку к примеру для скачки могу,
анализируя текст на ссылку


 
sniknik ©   (2009-08-01 11:43) [3]

> как?
через "оболочка IE в форме Form1", + http://ru.wikipedia.org/wiki/DOM
т.е. доступ к объекту есть, внутренняя структура известна (никакой анализ текста не нужен, в ней и так есть вписки ссылок страницы), методы объекта можно использовать (есть метод вызывающий яваскрипт, а уж он над страничкой "главный босс" и вызвать уже существующий скрипт для него не проблема).


 
XcCCC   (2009-08-01 13:03) [4]

добрался до всех имен и тегов, что дальше?

WebBrowser1.Document.QueryInterface(IHTMLDocument2, Doc);
HTMLWindow := Doc.parentWindow;
if not Assigned(HTMLWindow) then Exit;

 Memo1.Lines.Clear;
 HtmlDocument := WebBrowser1.Document as IHtmlDocument2;
 HtmlCollection := HtmlDocument.All;
 for I := 0 to HtmlCollection.Length - 1 do begin
   HtmlElement := HtmlCollection.Item(i, 0) as IHtmlElement;
   Memo1.Lines.Add(HtmlElement.TagName + "  " +
     HtmlElement.InnerText);


 
oldman ©   (2009-08-01 13:14) [5]

По клику, наверное, происходят какие-то действия?
Ну так и соверши их. Вот и эмуляция.
Или тебе надо, чтоб курсор дополз и кнопочка нажалась?


 
XcCCC   (2009-08-01 13:30) [6]

надо в странице выполнить скрипт
вроде решил задачу, покрайней мере пока работает



Страницы: 1 вся ветка

Текущий архив: 2009.10.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
1-1218789274
dmitry_12_08_74
2008-08-15 12:34
2009.10.04
Как заставить таскбар развернуться, чтобы показать все иконки?


2-1249236020
kapas
2009-08-02 22:00
2009.10.04
Delphi 2009 for Win32. class operators


2-1248430884
Мен123
2009-07-24 14:21
2009.10.04
Экспанентная форма.


2-1249369462
hoper
2009-08-04 11:04
2009.10.04
mcrypt в delphi


6-1207630477
_DATA_
2008-04-08 08:54
2009.10.04
Отправка данных через сокет в отдельном потоке