如何获得TWebBrowser的Back和Forward的状态

Question

webbrowser1.GoBack ;
webbrowser1.GoForward ;

Answer 1

这两个是动作，
而不是状态。我想知道的是
 能不能Back
 能不能forward

Answer 2

如下,同时也可以获得状态
可以在WebBrowser的OnCommandStateChange事件中设置按纽状态,如:
procedure TForm1.WebBrowser1CommandStateChange(
  Sender: TObject; Command: Integer; Enable: WordBool);
begin
  Case Command of
    CSC_NAVIGATEFORWARD:
      btnForward.Enabled:= Enable;  //设置前进按纽状态
    CSC_NAVIGATEBACK:
      btnBack.Enabled:= Enable;  //设置后退按纽状态
  end;
end;