안녕하세요 ..

아마 저 이외 다른 방법을 생각하고 생각하고 계신 분도 계시계지만,

일단은 제 생각 그대로를 알려드립니다.

방법은, 문자 .. 그렇다면 숫자는 총 10개. 0~9까지..

그렇다면 이 0~9숫자가 아니면 오류가 나오도록 하면 되겠지요.

예컨대, Text상자에 값이 들어왔다 Copy(Text1.text, Length(Text1.text) - 1, 1)을

해서 If문이든 Select 문이든 0부터 9를 for문으로 돌리셔서 i값과 비교해서 값이

아니면 ShowMessage('Error'); 라고 해주시면 됩니다.

이해가 잘 안되시면 다시 말씀해주세요 ..

그럼 좋은 시간 되십시오 ..