download free5555

seriarivar i:Integer; myole:oleVariant; begin myole := webbrowser2.Document; for i := 0 to myole.all.length - 1 do //if myole.all.item(strtoint(edit14.Text)).tagName = 'TEXTAREA' then // begin //showmessage(inttostr(i)); // myole.item(strtoint(edit14.Text)).name:='gggg'; if(myole.all.item(i).tagname = 'TEXTAREA') and (myole.all.item(i).classname = 'KHxj8b tL9Q4c') then begin myole.all.item(i).focus; myole.all.item(i).InnerText:=edit1.text; end; end;