TWebbrowser控件本身并不带statusbar
你得自己用TStatusbar冒充一个statusbar,然后处理webbrowser.onprogresschange,和onpropertychange,ondocumentcomplete
等事件来改变statusbar.text;比如
procedure TForm1.WebBrowser1ProgressChange(Sender: TObject; Progress,
ProgressMax: Integer);
begin
statusbar1.Text:=IntToStr(Progress);
end;