我在delphi中引入了vb的inet控件,来读取网页的原码
为什么有时读不全?有什么能实现读取网页源码功能的更好的解决办法?

解决方案 »

  1.   

    我沒用過inet, 只能來者有分了!
    但如果你將代碼貼出來, 說不定我也能給點意見!
      

  2.   

    aiirii(ari) :
      这个事情很急,是否有更好的解决方法?
    var stResult:string;
        i:integer;
    begin
     i:=2048*4;
      stResult:=Inet1.GetChunk(i);
      Memo1.Lines.add(stResult);
      while length(stResult)<>0 do
      begin
        sleep(1000);
        stResult:=Inet1.GetChunk(i);
        Memo1.Lines.add(Inet1.GetChunk(i));
      end;
    end;
      

  3.   

    Delphi自己的控件"NMHTTP1"就能读网页源码的为什么要用VB
      

  4.   

    SunKinXing(飞火流星) :
     我用的是delphi7,你能告诉我NMHTTP1在那里码?
     最好再举个例子
     
      

  5.   

    先修改一點:
      begin
        sleep(1000);
        stResult:=Inet1.GetChunk(i);
        Memo1.Lines.add(Inet1.GetChunk(i));
      end;
    改:
      Memo1.Lines.add(stResult);你再試試!!
      

  6.   

    也就是說改為:
      begin
        sleep(1000);
        stResult:=Inet1.GetChunk(i);
        Memo1.Lines.add(stResult);
      end;