@himitsu: Die Prozedur val gibt es schon. Und ich denke mal, er soll sie verwenden für seine GetInteger Funktion.
Delphi-Quellcode:
function GetInteger(s: String): Boolean;
var
Code: Integer;
i: Integer;
begin
val(s, i, Code);
result := Code = 0;
end;
Das wäre mein Ansatz aber das:
Zitat:
bis ein gültiger integer eingegeben wurde und den als result zurückliefert. Im Fehlerfall wird dem User die Fehlerposition mitgelteilt und erneut zur Eingabe aufgefordert.
Soll das innerhalb der Funktion passieren oder in der while-Schleife?