如何查看并修改html的源码?

要求在html的源码中加入一段代码,比如将<body>改成<body onselect="false">
该如何实现？？
有什么是类似于对文本文件的修改那样子的方法么？

解决方案 »

  1.   

    uses mshtml;
    先取得IE页面的IHTMLDocument2接口，然后再通过IHTMLBodyElement元素的put_onselect来实现。
      

  2.   

    www.2ccc.com上有一个控件EditHTML,很好用.
      

  3.   

    不是拉,是我自己在做网站的,由于对word,excel的复制功能不能够进行禁止,所以是先转换成mht格式的,所以想写一个小程序,对每个mht文件进行修改代码,可是这方面的资料没有,不知道如何着手,所以希望各位帮忙指导一下
      

  4.   

    var
            mPos: integer;
    begin
            Memo1.Lines.Clear;
            Memo1.Lines.LoadFromFile('d:\test.html');
            mPos := Pos('<body>',Memo1.Text);
            if mPos > 0 then
            begin
                    Memo1.SelStart := mPos -1;
                    Memo1.SelLength := Length('<body>');
                    Memo1.SelText := '<body onselect="false">';
                    Memo1.Lines.SaveToFile('d:\test.html');
            end;
    end;