Тема: twebbrouser
Показать сообщение отдельно
  #3  
Старый 28.05.2010, 18:50
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Простейший способ обойти ошибку это поместить все в секцию 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;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием