Hallo Zusammen!
Ich stehe gerade etwas auf dem Schlauch. Wieso fängt Delphi diese
Exception nicht:
Delphi-Quellcode:
program Project1;
{$APPTYPE CONSOLE}
{$O-}
//uses SysUtils; //Ohne Kommentar funktioniert es wunderbar :O
var
d: Integer;
begin
try
d := 0;
d := d div d;
except
writeln('Wer haette es gedacht ...');
end;
readln;
end.
Na gut, das es ohne die Sysutils keine EDivByZero
Exception gibt ist irgendwie klar, aber ich hätte trotzdem erwartete, dass ich im Except-Zweig lande.
Gibt es eine Möglichkeit, Delphi davon zu Überzeugen, die
Exception auch ohne Sysutils im Except-Block zu fangen? SEH per Hand (fs[0] ...), SetUnhandledExceptionFilter oder AddVectoredExceptionHandler würde ich gerne vermeiden.
Schönen Gruß,
Win32.API