How to change TEXTAREA value on a web page using TGeckoBrowser?

[Geziel Carvalho]

I tried the code bellow but only was successfull on INPUT.

procedure TForm1.login;
var s,s2:IInterfacedString;
  NE:nsIDOMElement;
begin
  s:=newstring('jnom_name');
  NE:=Browser.ContentDocument.GetElementById(s.AString);
  if assigned(NE) then
    begin
    s:=newstring('value');
    s2:=newstring('my text');
    NE.SetAttribute(s.AString,s2.AString);
    end;
end;

How to change TEXTAREA value on a web page using TGeckoBrowser?