WebBrowser控件使用(100分)

窗体上放一个WebBrowser
一个后退按钮，一个前进按钮，
问题：
如果有历史页前进和后退按钮可用，否则不可用，像IE浏览器一样。

OnCommandStateChange
procedure TForm1.WebBrowserCommandStateChange(Sender: TObject;
Command: Integer;
Enable: WordBool);
begin
if Command = CSC_NAVIGATEFORWARD then
BackButton.Enabled := Enable
else
if Command = CSC_NAVIGATEBACK then
ForwardButton.Enabled := Enable;
end;

谢谢了！