nun ja, Delphi macht da einiges mit:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Extended;
j, k: Integer;
begin
// 1
ShowMessage(Format('%1.4f', [(5/0)]));
// 2
ShowMessage(FloatToStr(5/0));
// 3
i := 5/0;
ShowMessage(FloatToStr(i));
// 4
j := Trunc(5/0);
ShowMessage(IntToStr(j));
// 5
k := 5 div 0;
ShowMessage(IntToStr(k));
end;
Mit den beiden Zeilen, die mit 1, 2 und 3 beschriftet sind, hat Delphi absolut keine Probleme. Bei Zeile mit 4 meckert es mit "Konstantenausdruck verletzt untere Grenze" und erst bei der Zeile mit 5 bemerkt es, dass das jetzt schon wieder eine Division durch 0 ist und zeigt einen entsprechenden Fehler an.
Bernhard