关于TWebbrowser，多个问题分别加分

Question

没人回答吗？以前我在CSDN上看到过相关的一些回答，为什么没人呢？是不是太难，我觉得不是很难，因为MSDN上就有，只不过我的E文很差，VB不懂

Answer 1

不知你是取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;至于后面的2个问题我想理论上应该可以实现，不过我现在把JavaScript忘了些等以后查资料再说吧。