Как кликнуть на нужную кнопку в IWebBrowser2?

[Wadimka]

Приветствую.

Не могу понять, как кликнуть на нужную мне кнопку в IWebBrowser2
в TWebBrowser никаких проблем, все просто и понятно, а тут не пойму


function TForm1.ClickButtons(WB: IWebBrowser2; textFind:String):boolean;
var form:variant;
CountElement, linkCount, i:integer;
Element:variant;
begin

result:=False;
Document := WB.Document as IHtmlDocument2;
linkCount:=Document.forms.length;
//getelementsbytagname('a');
//ShowMessage(IntToSTr(linkCount));
form:=Document.forms;
for i:=1 to linkCount-1 do begin
Element:=form.item(i);
form.item(i).click;
//CountElement:=form.item(i).count;
//ShowMessage(IntToStr(CountElement)) ;
//ShowMessage(form.item(i).innerHtml) ;
//if (form.item(i).type='submit') then begin
//end;
end;
{
for f:=0 to WebBrowser1.OleObject.Document.form s.Length-1 do begin
form:=WebBrowser1.OleObject.Documen t.forms.Item(f).elements;
for i:=0 to form.Length-1 do

if (form.item(i).type='submit') then begin
form.item(i).click; // submit ýòî êíîïêà 'Âîéòè' ýòî íàçâàíèå êíîïêè
end;
}
end;



получается получить только innerhtml всего объекта формы, но никак до ее елементов не могу достучатся!