在地址栏输入 如http://www.baidu.com/, 然后右单击--查看源文件,就可以把源文件保存下来.这个用DELPHI怎么实现?  用一个EDIT框让用户输入地址,然后按下BUTTON,源文件就保存在c:\1.txt了(期间不需要用户看到网页或其他显示)这个怎么实现?给点思路,有代码更好

解决方案 »

  1.   

    用fastnet的NMHTTP构件就可以
    procedure TForm1.Button1Click(Sender: TObject);
    var
    x:TStringList;
    begin
       x:=TStringList.Create;
       NMHTTP1.Get(Edit1.Text);
       x.Add(NMHTTP1.Body);
       x.savetofile(c:\1.txt');
       x.free;
    end;
      

  2.   

    他说的frames把?把frames的url再分离出来,组成一个url的List,然后用idhttp一个一个下不就得了。
      

  3.   

    用IdHTTP:
    source := IdHTTP1.Get(URL);