我在本机上都是好的,但到同事那里都只要是用代码对DHTMLEdit的内容进行操作都会提示不支持此接口

解决方案 »

  1.   

    我的机器也如此提示最后我发现原因是出在BroweMode上
      

  2.   

    不行啊,同事有台机器时可以的,原因在browemode是怎么回事啊
      

  3.   

    http://community.csdn.net/Expert/topic/3911/3911375.xml?temp=9.044826E-03
      

  4.   

    如果是browemode的问题要这样才能正常使用browemode:=False;
    browemode:=True;其他的,不知道了,没遇见过
      

  5.   

    谢谢chijingde,不是这个问题,是xp下面ie的sp2补丁屏蔽了这个接口了,我现在改用mshtml,但东西太多,好像问题也比较多,原来的页面用IHTMLDocument2接口操作webbrowser的innerhtml报错"不支持接口",其他窗体都是好的,对照一下也没少引用什么啊,什么问题还请教大家了
      

  6.   

    说的不清楚,是操作另一个窗口
    代码
    procedure TMainFrm.lv1DblClick(Sender: TObject);
    var
    MailFrm:TMailDetail;
    mail:TMailInfo;
    begin
    if lv1.ItemIndex=-1 then
    Exit;
    Mailfrm:=TMailDetail.Create(Application);
    mail:=maillist[lv1.ItemIndex];
    //这是这句报错了
    (Mailfrm.WebBrowser1.Document as IHTMLDocument2).body.innerHTML:=mail.InfoContent;
    MailFrm.EdtTitle.Text:=Mail.InfoName;
    MailFrm.edtPriority.Value:=mail.Priority;
    MailFrm.chkneedreply.Checked:=mail.NeedReply;
    MailFrm.DTPickReplyTerm.DateTime:=mail.ReplyTerm;
    if mail.Urgent=0 then begin MailFrm.chkimportant.Checked:=False;MailFrm.chkurgent.Checked:=False; end else
    if mail.Urgent=1 then begin MailFrm.chkimportant.Checked:=True;MailFrm.chkurgent.Checked:=False; end else
    if mail.Urgent=2 then begin MailFrm.chkimportant.Checked:=False;MailFrm.chkurgent.Checked:=True; end else
    if mail.Urgent=3 then begin MailFrm.chkimportant.Checked:=True;MailFrm.chkurgent.Checked:=True; end;
    MailFrm.EdtReceivers.Text:=Mail.ReceiveNumber;
    MailFrm.EdtCopyReceivers.Text:=mail.ReceiveNumber;
    MailFrm.Show;
    end;