delphi显示网页过程滚动条问题

Question

我用delphi显示一个网页去掉滚动条用了一下代码
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
begin
  WebBrowser1.OleObject.Document.Body.Scroll:='no';
  WebBrowser1.OleObject.Document.Body.style.border:='none';
  Webbrowser1.OleObject.Document.Body.Style.margin:='0px';
end;但是打开网页的过程中会显示滚动条然后才消失，这一过程很不美观，如何直接显示网页而不显示滚动条（主要是来显示广告界面）？我用的是TWebBrowser控件，能否用其它控件显示网页？我见过用TPanel显示网页的，不知如何实现。积分不够不好意思，有机会补上。

Answer 1

WebBrowser1.TheaterMode := False;

Answer 2

给个url看下，我试了超长页面，没有你说的现象尼