我用WebBrowser载入一个网站时,这个网站里面有很多Frame,Frame里又有很多嵌套的Frame,怎么能遍历网站里的所有Frame,已经在网上找了,没有很好的解决方法,请哪位大哥遇到过,请多多指教,多谢了

解决方案 »

  1.   

    具体 的url能否发来,我尝试一下
      

  2.   

    to    ksrsoft哥们,你的QQ是多少?我可以发到你QQ上的。
      

  3.   

    @ ksrsoft
    因为需要用户名,密码的。
      

  4.   

    Function TForm1.GetFrame(FrameNo:Integer):IWebbrowser2;
    var
    OleContainer:IOleContainer;
    enum:IEnumUnknown;
    unk:IUnknown;
    Fetched:PLongint;
    begin
        while Form1.webbrowser1.ReadyState<>READYSTATE_COMPLETE do
        Application.ProcessMessages;
        if Assigned(webbrowser1.document) then
            begin
                Fetched:=nil;
                OleContainer:=webbrowser1.Document as IOleContainer;
                OleContainer.EnumObjects(OLECONTF_EMBEDDINGS,enum);
                Enum.Skip(FrameNo);
                Enum.Next(OLECONTF_EMBEDDINGS,Unk,Fetched);
                Result:=Unk as IWebbrowser2;
            end
        else
            Result:=nil;
    end;