Delphi函数:
功能 返回字符串S转换成整数
说明 字符串非整数表达时则返回默认值Default
参考 procedure System.Val
例子 SpinEdit1.Value := StrToIntDef(Edit1.Text, 0);
返回int(Edit1.Text) 如果不成功,返回0
假设edit1.text:=‘1000‘;
则strtointdef(edit1.text,0)返回值为1000.
如果edit1.text:=‘fdafds‘,则返回值为0.
(如果你用strtoint(edit1.text)当edit1.text:=‘fdads‘时会报错的)我们可以用strtointdef这个函数来判断一个 文本框 输入的是否是整数.