[NumLock]

Код:

var
  doc: IHTMLDocument2;
  i: Integer;
begin
  doc:=WebBrowser1.Document as IHTMLDocument2;
  for i:=0 to doc.all.length-1 do
  begin
    if LowerCase((doc.all.item(i, 0) as IHTMLElement).tagName)='span' then
      if (doc.all.item(i, 0) as IHTMLElement).innerText='click me' then
        (doc.all.item(i, 0) as IHTMLElement).click;
  end;
end;

http://zalil.ru/34464864

твоя кнопка span