Chami.com Tips

var
  wOldErrorMode : Word;
begin
  {
   tell windows to ignore critical
   errors and save current error mode
  }
  wOldErrorMode :=
    SetErrorMode(
      SEM_FAILCRITICALERRORS );
  try
    {
     code that might generate a
     critical error goes here...
    }
  finally
    {
      go back to previous error mode
    }
    SetErrorMode( wOldErrorMode );
  end;
end;