我要实现的是,比如用Internet Explorer打开一个网站(http://www.csdn.net).那么程序会自动在打开的网站中加上一自己定义的HTML代码,。我自己的思路是监视Internet Explorer临时文件夹。就是临时文件夹中有新建HTM文件,就会修改,在让Internet Explorer加载,哪们朋友有代码最好,多谢了

解决方案 »

  1.   

    uses 
      MSHTML; 
    procedure TForm1.Button1Click(Sender: TObject); 
    begin 
      Webbrowser1.Navigate('www.baidu.com');
      //启动一个网站的网页
     end; procedure TForm1.Button2Click(Sender: TObject); 
    var 
      Range: IHTMLTxtRange; 
    begin 
      Range := ((WebBrowser1.Document as IHTMLDocument2).body as 
        IHTMLBodyElement).createTextRange; 
      Range.collapse(False); 
      Range.pasteHTML('<br><b>大家好,我是老李,csdn Id Laoli</b>'); 
    //加入您要加的东西
    end; 人家写的 帮你转IE插件可以参考APPLEVB的文章
    或者去我网站下栽一个修改 
    http://devh.net