вот эта часть кода тебе покажет какие элементы есть на странице
Код:
var
ovElements: OleVariant;
i: Integer;
begin
ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
for i := 0 to (ovElements.Length - 1) do
ShowMessage(ovElements.item(i).tagName+#10+
ovElements.item(i).type+#10+
ovElements.item(i).Value);
end;
вот нажатие
Код:
var
ovElements: OleVariant;
i: Integer;
begin
ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
for i := 0 to (ovElements.Length - 1) do
if (UpperCase(ovElements.item(i).tagName) = 'BUTTON') and
(UpperCase(ovElements.item(i).type) = 'SUBMIT') then
ovElements.item(i).Click;
это если вас интересует кнопка с сылкой подругому чуток