Also in dieser Prozedur selbst kann ich nicht rausfinden welche Komponente die
Exception ausgelöst hat?
Edit: Ich hab gerade gesehen das die Fehler vom Typ EIdException sind, mit der modifizierten Version kann ich die Fehler jetzt abfangen:
Delphi-Quellcode:
procedure TData.AppException(Sender:TObject; E:
Exception);
begin
Screen.Cursor:=crDefault;
if E
is EIdException
then
begin
//Hier muss ich jetzt noch schauen was das für Fehler sind
end;
end;