函式功能及說明
Delphi函式：
首部 function StrToIntDef(const S: string; Default: Integer): Integer; $[SysUtils.pas
功能 返回字元串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這個函式來判斷一個文本框輸入的是否是整數.
