Jupp, die On-Sektionen entsprechen einer IS-Prüfung und die prüft, ob mindestens dieser Type vorliegt (Type + alle Nachfahren)
PS: Da dort der Else-Block fehlt, würden alle nicht angegebenen Exceptions einfach übersehn/ignoriert.
Da
Exception der Basistyp aller Exceptions-Klassen ist, würde der alle Exceptions abfangen.
Delphi-Quellcode:
except
on E:
Exception do
WriteLn(E.ClassName, '
: ', E.
Message);
// eventuell sogar noch den Exception-Typen mit ausgeben
end;