문자열이 숫자로만 이루어져있는지 판단하는 함수

 

문자열이 숫자로만 이루어져있는지 판단하는 함수는 TryStrToInt를 사용하면 된다!

* SysUtils에 선언되어 있는 내장함수임!

 

function TryStrToInt(const S: string; out Value: Integer): Boolean; 

판단하고자 하는 String 변수 S가 문자면 true , integer 변수 Value에 값을 넣어주고

숫자면 false 값 return!

 

 

uses SysUtils ...   procedure Tform1.test; var value : integer; begin       if TryStrToInt(Edit1.Text, value ) then       begin            showemssage('숫자');       end else       begin            showemssage('문자');       end; end;

 

 

* 유사함수 StrToIntDef