[udachnik2]

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
Doc: IHTMLDocument2;
  Buttons: IHTMLElementCollection;
  Button: IHTMLElement;
  i: Integer;
begin
  Doc := WebBrowser1.Document as IHTMLDocument2;
  Buttons := Doc.all.tags('BUTTON') as IHTMLElementCollection;
  for i := 0 to Buttons.length - 1 do
  begin
    Button := Buttons.item(i, EmptyParam) as IHTMLElement;
    if AnsiSameText(Trim(Button.innerText), 'Çàïîëíåíî') then
    begin
      Button.click;
      Break;
    end;
  end;
end;

Я нажал на первую кнопку. Но там есть еще продолжение:

Код:

<input data-disable-with="Ждите..." disabled="disabled" name="commit" type="submit" value="Далее" />

Как мне её то нажать? Её не получается найти таким способом. Она якобы не кнопка.