请教webbrowser组件的goback的出错怎么编写

[jumphigh]

我在一个程序中用到了

webbrowser的goback方法

第一次载入一个web页后，如果选择前进和后退的话，程序就会出错。这是因为这时IE里还没有浏览过网页的历史。所以，为了解决这个问题，必须在GoForward、GoBack中加入一段代码，防止错误的产生。

但是不知道怎样编写goback的try...except
也不知道错误类型是什么

try
webbrowser1.goback;

except
on whaterror do ??

还望各位大虾

多多指教

[Ardus]

try
WebBrowser1.goBack
except
ShowMessage('没有历史页')
end

[ace]

在webbrowser1的OnCommandStateChange中处理即可

例:
procedure TMainForm.AWebCommandStateChange(Sender: TObject;
Command: Integer; Enable: WordBool);
begin
if Command = CSC_NAVIGATEBACK then BtnBack.Enabled := Enable;
if Command = CSC_NAVIGATEFORWARD then BtnNext.Enabled := Enable;
end;

[alaclp]

同意ace的意见