Division

[ste_ett]

Natürlich wird die Exceptions aussgelößt!

Division durch 0 wird IMMER eine Exception auslösen!

Code:

procedure testen;
var
  a, b: Double;
begin
  b := 0;
  try
    a := 0 / b;
  except
    a := 123456;
  end;
  showmessage(floattostr(a));
end;

Per showmessage kommt '123456'.