Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: EDivByZero ohne Sysutils fangen

   
    by himitsu, 4. Aug 2011
  Eben nicht.
  Es ist eine System-Exception und keine Delphi-Exception.
  Ohne SysUtils keine Delphi-Exceptions und ohne Delphi-Exceptions (also die Objekte, welche ein Nachfahre von der Klasse Exception sind), gibt es auch keine Try-Except/Finally-Behandlung.
  
  Die System-Exception für div 0 hat den Fehlercode 200, welches nach TRuntimeError reDivByZero gemapt wird.
  Mit eingebundener SysUtils...
• Forum: Object-Pascal / Delphi-Language

  AW: EDivByZero ohne Sysutils fangen

   
    by himitsu, 4. Aug 2011
  procedure RunErrorAt(ErrCode: Integer; ErrorAtAddr: Pointer);
  begin
  ErrorAddr := ErrorAtAddr;
  _Halt(ErrCode);
  end;
  Ohne SysUtils ladet man dort und mit SysUtils wird stattdessen für bekannte Fehler die entsprechende Exception ausgelöst.
• Forum: Object-Pascal / Delphi-Language

  AW: EDivByZero ohne Sysutils fangen

   
    by himitsu, 4. Aug 2011
  Vermutlich weil die SysUtils nicht nur die Exceptionklassen bereitstellt, sondern auch noch so Einiges für die Exception-Behandlung initialisieren/einbinden.
  
  Ohne SysUtils wird bei dieser Exception ein ausgeführt und ein entprechender Fehlercode zurückgegeben (ans System).
  Die Behandlung bricht also sofort ab und das war's dann, da die Exception unbehandelt bis in System durchgerauscht ist.