Bei meinem Delphi gibt es im BIN-Verzeichnis 'ne Grep.exe. Wenn ich die so aufrufe
Code:
c:\Delphi7\Bin>grep -dni except "e:\delphi\*.pas > grep.except.log"
gräbt die sich durch alle .pas-Dateien in dem Verzeichnis und raus kommt eine Datei in der alle Dateiname, die Zeilennummer und die Zeile stehen, in der die Zeichenfolge Except zu finden ist.
Und wenn man schon dabei ist, kann man mal schauen, an wie vielen Stellen das raise oder das Create fehlt:
Delphi-Quellcode:
if SomeCondition
then
raise Exception('
some error message');
Grep nach "raise
Exception\(" und "raise e[a-z]*\(".
und
Delphi-Quellcode:
if SomeCondition
then
Exception.Create('
some error message');
Grep nach " e[a-z]*\.Create\("
(Davon gab es eine sogar in er Delphi 10.2
RTL.)
Ich habe damals darüber geblogt:
When an exception is nil in the exception handler