Ja, allerdings würde ich persönlich die Einrückung anders als in der Delphi Dokumentation setzen. In der Delphi Dokumentation wird das else auf die Ebene des except gesetzt:
Delphi-Quellcode:
try
...
except
on EZeroDivide do HandleZeroDivide;
on EOverflow do HandleOverflow;
on EMathError do HandleMathError;
else
HandleAllOthers;
end;
Dagegen würde ich diese Einrückung bevorzugen:
Delphi-Quellcode:
begin
try
WriteLn( '
Hallo Welt'.ToInteger() );
except
// eine Folge von Exception-Behandlungsroutinen, optional mit nachfolgendem else
on EConvertError
do
WriteLn('
Ein zahlenloser Tag');
else
WriteLn('
Das Programm ist fehlerhaft. Tauschen sie es um.');
end;
end.
http://docwiki.embarcadero.com/RADSt.../de/Exceptions
Zitat:
ExceptionBlock ist entweder
eine weitere Anweisungsfolge oder
eine Folge von
Exception-Behandlungsroutinen, optional mit nachfolgendem else Anweisungsliste