![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как программо кликнуть по ссылке в TWebBrowser?
kofman © (2002-11-03 15:55:00)Мастера help, я загружаю в TWebBrowser html-страничку на которой есть ссылки, как мне программно кликнуть по какой нибудь из них?
kofman (2002-11-12 16:38:00) [1]Намек понял, поэкспериментирую:)
int64 (2002-11-12 13:52:00) [2]А что есть "банер"?
Я такого элемента не знаю. Покажи, где он в MSDN.
kofman (2002-11-12 00:34:00) [3]>int64 это не совсем то, надо в TWebBrowser загрузить страничку с банером и по ней кликнуть, вот как это сделать?
kofman (2002-11-12 00:34:00) [4]Ну т.е. не по "ней" а по банеру:)
kofman (2002-11-07 21:26:00) [5]>int64 спасибо, это кажется то что нужно
int64 (2002-11-06 20:09:00) [6]procedure TForm1.Button1Click(Sender: TObject);
var
Coll : IHTMLElementCollection;
Doc: IHTMLDocument2;
i: integer;
begin
Doc:= IHTMLDocument2(WB.Document);
if assigned(Doc) then
begin
Coll:=IHTMLElementCollection(Doc.links);
for i:=0 to Coll.length-1 do
with HTMLLinkElement(Coll.item(i,varEmpty)) do
//далее проверяем линк на какой нить атрибут (например innerText)
//полный список атрибутов смотри в MSHTML.DispHTMLLinkElement
//если не проверять, кликнем на первый линк
if innerText="Текст ссылки" then click;
end;
end;
kofman (2002-11-06 19:23:00) [7]Ну а при чем здесь Navigate? Мне надо загрузить страничку, она каждый раз будет разная, и именно нажать нассылку а не перейти - цель осуществить клик.
int64 (2002-11-06 01:27:00) [8]TWebBrowser.Navigate
kofman (2002-11-05 22:32:00) [9]Ну вообще-то не совсем понятно, там все вольше вокруг да около. Может кто конкретно знает?
kofman (2002-11-03 23:58:00) [10]Спасибо попробую разобраться
Ihor Osov'yak (2002-11-03 19:44:00) [11]см http://delphi.mastak.com/cgi-bin/forum.pl?look=1&id=1036333688&n=4и мой месидж от (03.11.02 19:41)
ЗЫ. Анара не слюшай...