Простейший способ обойти ошибку это поместить все в секцию try except end. Но в этом случае любая ошибка, даже несвязанная с отсутствием странички будет гасится.
Код:
procedure TForm1.Button3Click(Sender: TObject);
begin
try WebBrowser1.Navigate('С://book/index.html'); except end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
try WebBrowser1.GoBack; except end;
end;