Delphi中如何以HTTP方式读取网站一个txt文件。

比如：http://www.baidu.com/list.txt
如何读取list.txt中的内容？

两个办法
1，下载下来，然后MEMO再LOADFROMFILE。
2，IDHTTP下载下来保存到到STREAM中，然后直接从内存中LOADFROMSTREAM就可以了。

完全可以实现，我写了一个函数，给分吧 procedure search(dir:string); var targetpath:string;{目标路径名} sr:tsearchrec; strlist:tstringlist; str:string; begin try {第一阶段:找出初始dir目录下的所有文件, 其中dir为公共变量，值由你自己去确定} strlist:=tstringlist.create(); targetpath:=extractfilepath(dir);{分解出目标路径名} //先找文件 if findfirst(dir,faanyfile,sr)=0 then repeat if((sr.name<>'.')and(sr.name<>'..')and(sr.attr<>fadirectory)then//排除父目录和本目录两个假文件只取文件}} begin//如果是文件，就打开并加入了文本框里 strlist.loadfromfile(targetpath+sr.name);//读取文件 str:=stringreplace(strlist.tostring,#13,'',[rfreplaceall]);//把回车符换掉，保证在同一行 form1.memo1.lines.add(str);//加入到文本框中 end; until findnext(sr)<>0; //找子目录 if findfirst(dir,faanyfile,sr)=0 then repeat if(sr.name<>'.')and(sr.name<>'..')and(sr.attr=fadirectory) then//排除父目录和本目录两个假文件} //排除文件} search(targetpath+sr.name+'\*.*');{递归调用} until findnext(sr)<>0; finally findclose(sr); strlist.free; end; end;