Exception-Behandlung weiterreichen

[himitsu]

Meine Überlegung war halt, die Exception an die eventuell bereits reistrierte Exception-Behandlung weiterzureichen, so daß eben nicht nocheine weiter Registrierungsstelle dazukommt.

Es geht hier ja nur um Exceptions in den anderen (aktuell noch) zwei StatusEvents, wo die dort eventuell auftetenden Exceptions ja den weiteren Programmablauf nicht verändern (gibt da ja keine Rückkopplung oder so).


Also würde ich dann sowas einbauen

Delphi-Quellcode:

type TXMLExceptionEvent = Procedure(E: Exception; Owner: TObject; Var ShowError: Boolean) of Object;

property OnException: TXMLExceptionEvent;

ShowError wäre per Standard False und wenn man es auf True setze, würde die Exception-Meldung von mir angezeigt.

Owner wäre dann das Objekt in dessen Ereignisprozedur es passiert ist.