[델파이] VB의 IsNumeric같은 함수 만들기

VB에서는 문자열 값이 수치값인지 확인하는 IsNumeric이라는 함수가 있다.
이런 것을 델파이에서 쓰려면 아래의 함수를 사용하면 간단하게
문자열이 수치값인지 확인할 수 있다.

function IsNum(sStr : string) : boolean;
var
  nErr : integer;
  nRet : integer;
begin
  Val(sStr, nRet, nErr);
  Result := (nErr = 0);
end;