Hm, kann ich nicht nachvollziehen:
Delphi-Quellcode:
procedure TForm1.btn1Click(Sender: TObject);
var
Hoehe: Double;
begin
try
Hoehe:=50-sqrt(Sqr(5)-sqr(25));
ShowMessage(FloatToStr(Hoehe));
except
on E:
Exception do
ShowMessage(E.
Message);
end;
end;
Exception wird ausgelöst und gefangen.