mickyblue wrote:

> 함수인지는 잘모르겠는데

> 문자인지 숫자인지 판별해주는 함수(기능)이 있는지여

> 있으면 알려주세여(소스주시면 감사)



안녕하세요. 까마귀입니다.

키 입력 하나하나 마다 알고 싶으신 건지 아님 한 변수나 필드에 있는 값이 문자인지

숫자인지 알고 싶으신 것인지 잘 모르겠네요.

키 입력마다 알고 싶으시면 KeyPress 이벤트에서 처리하시면 될것 같고요.

한 변수나 필드에 있는 값을 알고 싶으시면 예외처리를 이용하면 될것 같네요.



키 입력 처리

KeyPress Event에 코딩.



procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

case Key of

'0'..'9' : Exit;

#8,#13 : Exit; // #8 : BackSpace #13 : Enter

else begin

ShowMessage('숫자가 아님');

Key := #0; // 키입력을 없애기. 한마디로 입력이 않됨.

end;

end;

end;





변수의 값 확인 // 만일 String 변수에 있는 값이 모두 숫자데이터인지 확인.

var

Str : String;



try

StrToInt(Str);

ShowMessage('모두 숫자');

except

ShowMessage('문자가 있음');

end;



허접한 예외처리를 보여드렸는데요, 잘 연구하시면 훨 좋은 것이 나올겁니다.

님이 정확히 무엇을 원하시는지 몰라서, 제대로 설명이 어렵네요.

그럼.







위대한 단군혼이 살아있는 나라.... 대한민국.