Feststellen von Integer-Wert

[mirage228]

Delphi-Quellcode:

var
  i: Integer;
begin
  if TryStrToInt(Edit1.Text, I) and (I > 0) and (I < 300) then
  begin
   // mach was
  end;
end;

mfG
mirage228