Exception-Frage (Exception auslesen)

[Daniel]

Du möchtest den Typ der Exception erkennen?

Delphi-Quellcode:

try
...
 except
   // IO error
   On E : EInOutError do
     ShowMessage('IO error : '+E.Message);
   // Dibision by zero
   On E : EDivByZero do
     ShowMessage('Div by zero error : '+E.Message);
   // Catch other errors
   else
     ShowMessage('Unknown error');
 end;