Is_int?

fnast ud af det

Fra Delphi's hjælp
<SNIP>
uses Dialogs;
var

  I, Code: Integer;
begin
  { Get text from TEdit control }
  Val(Edit1.Text, I, Code);
  { Error during conversion to integer? }
  if Code <> 0 then
    MessageDlg('Error at position: ' + IntToStr(Code), mtWarning, [mbOk], 0);
  else
    Canvas.TextOut(10, 10, 'Value = ' + IntToStr(I));

end;
</SNIP>

ellers så brug
var
  i : Integer;
try
  i :=  StrToInt('12345');
except
  i := 0;
  //s er ikke en gyldig Integer;
end;

Jens B