Как программо кликнуть по ссылке в TWebBrowser?

← →
kofman (2002-11-03 15:55) [0]

Мастера help, я загружаю в TWebBrowser html-страничку на которой есть ссылки, как мне программно кликнуть по какой нибудь из них?

← →
Ihor Osov'yak (2002-11-03 19:44) [1]

см http://delphi.mastak.com/cgi-bin/forum.pl?look=1&id=1036333688&n=4 и мой месидж от (03.11.02 19:41)

ЗЫ. Анара не слюшай...

← →
kofman (2002-11-03 23:58) [2]

Спасибо попробую разобраться

← →
kofman (2002-11-05 22:32) [3]

Ну вообще-то не совсем понятно, там все вольше вокруг да около. Может кто конкретно знает?

← →
int64 (2002-11-06 01:27) [4]

TWebBrowser.Navigate

← →
kofman (2002-11-06 19:23) [5]

Ну а при чем здесь Navigate? Мне надо загрузить страничку, она каждый раз будет разная, и именно нажать нассылку а не перейти - цель осуществить клик.

← →
int64 (2002-11-06 20:09) [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-07 21:26) [7]

>int64 спасибо, это кажется то что нужно

← →
kofman (2002-11-12 00:34) [8]

>int64 это не совсем то, надо в TWebBrowser загрузить страничку с банером и по ней кликнуть, вот как это сделать?

← →
kofman (2002-11-12 00:34) [9]

Ну т.е. не по "ней" а по банеру:)

← →
int64 (2002-11-12 13:52) [10]

А что есть "банер"?
Я такого элемента не знаю. Покажи, где он в MSDN.

← →
kofman (2002-11-12 16:38) [11]

Намек понял, поэкспериментирую:)

Как программо кликнуть по ссылке в TWebBrowser? Найти похожие ветки