怎样取得iframe或frameset中的内容

来源:互联网 发布:mac版梦幻西游 编辑:程序博客网 时间:2024/04/30 20:57

从WebBrowser控件中取得指定FrameNo号的Document的内容,如果你不知道iframe号可从WebBrowser1.document的所有tag中循环查找!

Function TfrmMain.GetFrame(web:TWebbrowser;FrameNo:Integer):IWebbrowser2;
var
  OleContainer:IOleContainer;
  enum:IEnumUnknown;
  unk:IUnknown;
  Fetched:PLongint;
begin
  Result := nil;
  while web.ReadyState<>READYSTATE_COMPLETE do
      Application.ProcessMessages;

  if Assigned(web.document) then
  begin
    Fetched:=nil;
    OleContainer:=web.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; 

原创粉丝点击