Добрый день!
Есть простейший код браузера с использованием TWebBrowser

Код:

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ExtCtrls, OleCtrls, SHDocVw, StdCtrls;

procedure TForm1.Button1Click(Sender: TObject);
var
  _URL, Flags, TargetFrameName, PostData, Headers: Olevariant;
begin
  _URL := Edit1.Text;
  Flags := 0; TargetFrameName := 0; Postdata := 0; Headers := 0;
  EmptyParam;
  WebBrowser1.Navigate2(_URL, Flags, TargetFrameName, PostData, Headers);
end;

на простых страницах все работает, но на некоторых страницах, где JAVA видимо слишком сложный браузер выдает ошибки
Пример
forums.kuban.ru при загрузке начальной страницы выдает: Ошибка 'loginform' есть null или не является объектом
delphiexpert.ru/view_download.php?id=112 через несколько секунд срабатывает JAVA-скрипт и уже программа зависает с выводом ошибки: Invalid floating point operation

ИЕ8 работает нормально, в чем может быть проблема?

[ALexandr555]

TWebBrawser же старенький вот и ошибки
Используйте браузер с EmbededWB там у него можно в свойствах поставить чтобы он не ругался на ошибки Java

вообще есть более сложная версия обозревателя на базе TWebBrowser, и она все нормально обрабатывает, но там как то непонятно

Код:

procedure TfrmMyBrowser.btnGoClick(Sender: TObject);
begin
  if edURL.Text <> '' then
  begin
    lvEventLog.Clear;
    WB_Navigate(GetCurrentWB, edURL.Text);
     // set focus to webbrowser document
    WB_SetFocus(GetCurrentWB);
  end;
end;

это маленький кусочек, относящийся к кнопке "загрузить"

[ALexandr555]

не понятно, что еще за более крутая версия? используй с палитры компонентов EmbededWB он такой же

крутая версия отсюда
delphiexpert.ru/view_download.php?id=112

[ALexandr555]

я давненько копался с этим и что то взял от туда а чтото с демки EmbededWB
у EmbededWB достаточно в событии ошибки скрипта прописать

Код:

   Showdialog:=false;//не показываем ошибку с выбором продолжения сценария
   ContinueScript := true;//жмем дальше

да что там не понятно кстати GetCurrentWB это браузер активной вкладки

так это что? неисправимый дефект TWebBrowser? и надо писать код в стиле try?

[ALexandr555]

нет, он вроде даже с try должен сообщать об ошибке сценария

с одним дефектом удалось разобраться
выставить в свойствах WebBrowser1 silent:=true

на forums.kuban.ru помогло, перестала фигня высовываться
что делать с delphiexpert.ru/view_download.php?id=112 всплывающее окно - вывод неустранимой ошибки, блокирующей работу программы
обработку ошибок вводить?

если кто знает еще кривые сайты, можно в этой теме их URL написать
буду на них браузер тестировать

[ALexandr555]

ааааааа, чего ты хочешь если я написал что тебе надо сделать?

не, не надо, все уже написано до вас(с)

initialization
// prevent floating point errors
Set8087CW($133F);