===关于MSHTML的一个问题===

Question

一个Web Form名为talk，内有三个INPUT，其中一个INPUT名为systemp，如何能将systemp的值改变。我的代码如下，但是却发生错误。到底错在哪里呢？
procedure TMainForm.Submit
var
  Doc:IHTMLDocument2;
  Form:IHTMLFormElement;
  Say:IHTMLInputElement;
begin
Doc:=Webbrowser1.Document as IHTMLDocument2;
Form:= Doc.all.item('talk',0) as IHTMLFormElement;
Say:=Form.item('systemp',0) as IHTMLInputElement;
Say.value:='添加提交内容';
Form.Submit;
end;

Answer 1

// 這樣寫試試
if Succeeded(WebBrowser1.Document.QueryInterface(IHTMLDocument2, Doc)) then
// do something;