取得多frame的每个Frame中的内容

1、如何在程序中取得多frame的每个Frame中的内容 100分 单个Frame的页面可用
wb_DataInfleObject.document.documentelement.innerhtml;
wb_DataInfleObject.document.documentelement.innerText;
WebBrowser1.oleobject.document.links.item(i).href
等取得内容或联接，但如果是多Frame，则只能得到主页面的内容，如何取得Frames的数量及每个Frame的内容？
不知你是取TEXT还是HTML不过没关系全可以实现。
当页面下载到浏览器中以后，
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i,j:integer;
begin
memo1.Clear;
i:=webbrowser1.oleobject.document.documentelement.document.frames.length；//得到frame的数量。
memo1.Lines.Add('have Frames: '+inttostr(i));
for j:=0 to i-1 do
begin
memo1.lines.add('');
memo1.Lines.Add('Frame '+inttostr(j+1)+' from here');
memo1.Lines.Add(webbrowser1.oleobject.document.
documentelement.document.frames.item(j).document.
documentelement.innerHtml);//取得每个Frame中的HTML内容
end;
end;