TWebBrowser crashes with embedded Youtube clips

Question

Here is my code:

type
  TForm1 = class(TForm)
    WebBrowser1: TWebBrowser;
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TO         


        

Answer 1

A bit more beautiful solution:

Math.SetExceptionMask([exInvalidOp, exDenormalized, exZeroDivide, exOverflow,
  exUnderflow, exPrecision]);

If I read documentation correct, Math.SetExceptionMask silences every exception mentioned.

However, it is just cleaner and more beautiful version of @Arjen's approach.

Answer 2

Try to disable temporarily FPU exception with Set8087CW(0x133f); info