Exception lässt sich nicht abfangen...

[Luckie]

Ich weiß nicht, wie bei dir val eine Exception auslösen kann. Ob der String konvertiert werden konnte oder nicht, wird in dem var Parameter Code zurückgegeben: 0 -> hat geklappt, <> 0 -> hat nicht geklappt.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  s: String;
  V: Integer;
  Code: Integer;
begin
  s := 'xyz999999999999';
  try
    val(s, V, Code);
    ShowMessage(IntToStr(V));
  except
    on E: Exception do
      ShowMessage(E.Message);
  end;
end;

Selbst wenn ich schreibe s := '99999999999999999999999999999999999999999';, komnmt keine EOverFlow-Exception.