Форум: "Сети";
Текущий архив: 2008.03.09;
Скачать: [xml.tar.bz2];
ВнизПрограмно кликнуть на ссылку из ТВебБровзера Найти похожие ветки
← →
WebSQLNeederr (2007-06-05 15:50) [0]Есть компонент ТВебБровзер вот и в него загружается какая то страница. Нужно програмно кликнуть на определенную ссылку и что бы она открылась не в отдельном окне ИЕ а в отдельном МОДАЛЬНОМ окне моей программы.
← →
nali (2007-06-06 06:59) [1]Скачиваешь страницу, потом вписываешь ее в браузер в своем окне.
← →
WebSQLNeederr (2007-06-06 12:35) [2]А как програмно кликнуть?
← →
clickmaker © (2007-06-06 13:21) [3]
> как програмно кликнуть?
ModalWebBrowser.Navigate(url)
← →
WebSQLNeederr (2007-06-12 15:59) [4]Блин ну не предлагайте ГЛУПОСТИ !!!
ModalWebBrowser.Navigate(url)
Это просто откроет страницу а все переменные окружение php и javascript исчезнут.
← →
etc (2007-06-12 16:14) [5]
> Блин ну не предлагайте ГЛУПОСТИ !!!
а вы не спрашивайте про них !!!
← →
WebSQLNeederr (2007-06-12 16:28) [6]etc ты хочешь сказать, что то что было предложено глупостью не является? Или ты хочешь сказать что простое забивание адреса в ТВебБровзер есть аналог клика? Не смешите меня, мне советы дельные нужны а не вольное творчество дилетантов!
← →
etc (2007-06-12 16:53) [7]
> WebSQLNeederr (12.06.07 16:28) [6]
:)
ну поясните дилетантам, что есть "Програмно кликнуть на ссылку", если вы четко знаете, что то что предложено не оно ?
да и ссылки могут быть разные
href="#"
href="javascript:...."
....
← →
WebSQLNeederr (2007-06-12 17:18) [8]etc я о том и говорю, что простое вбивание адреса ссылки в другой веббровзер это не аналог клика. Ведь в таком случае не передаются сессии, переменные окружения, не сохраняются рефереры и т.д. ...
← →
nali (2007-06-13 14:10) [9]Кликнуть можно так:
procedure AnchorClick(num:integer);
var
idoc: IHTMLDocument2;
cols:IHTMLElementCollection;
begin
try
idoc:=Form1.WebBrowser1.Document as IHTMLDocument2;
if idoc=nil then exit;
cols:=(idoc.all.tags("A") as IHTMLElementCollection);
if cols=nil then exit;
if cols.length>num then // num - номер ссылки
(cols.Item(num,0) as IHTMLElement).click;
finally
end;
end;
← →
WebSQLNeederr (2007-06-13 16:28) [10]nali, спасибо. Вот это сразу видно ответ профессионала.
← →
Wahnsinng © (2007-06-14 06:51) [11]Клик - WebBrowser1.OleObject.Document.Links.Item(0).click;
Получить текст ссылки
S := WebBrowser1.OleObject.Document.Links.Item(0).outerHTML;
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2008.03.09;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.042 c