delphi获取表单内容

Question

通过下面的函数：
function GetValueByElementName(web: TWebBrowser; elementName: string; index: integer): string;begin    result := (((web.Document as IHTMLDocument2).body.all as      IHTMLElementCollection).item(elementName, index) as IHTMLInputElement    ).valueend;
利用mshtml可以获取input表单 
但是不可以获取 ，<Textarea>   </textarea>
请问如何获 <Textarea> ?
谢谢

Answer 1

我的意思是 获取网页表单