Q&A

  • Edit 창에 숫자만 입력되어 있는지 체크하려면 어떻게 해요?
안녕하세요?



Edit1 에 text 를 입력하고 버튼을 눌렀을때 숫자만 8글자 있으면



showmessage('ok');



숫자외에 다른문자가 있으면



showemssage('no');



이렇게 하려고 하는데 잘 안되네요...



도와주세요...

2  COMMENTS
  • Profile
    loke 2001.06.01 05:01
    첫째 edit Box 에 숫자만 들어가게 할려면



    procedure form1.edit1presskey(.....);

    begin

    if not(key in ['0'..'9',#8,#7] then key := #0;

    end;

    해주시면 되구여..

    입력후에 숫자인지 채크하실려면...

    입력된 길이만큼 for 문으로 돌리면서 숫자인지 채크하면 될것 같네요... 위에것 참조해서...





    초봉이 wrote:

    > 안녕하세요?

    >

    > Edit1 에 text 를 입력하고 버튼을 눌렀을때 숫자만 8글자 있으면

    >

    > showmessage('ok');

    >

    > 숫자외에 다른문자가 있으면

    >

    > showemssage('no');

    >

    > 이렇게 하려고 하는데 잘 안되네요...

    >

    > 도와주세요...

  • Profile
    조복기 2001.06.01 04:18


    많이 나온 답변입니다..

    조회를 해보시면 좀더 응용할수있는 예제들도 많이 있을겁니다.

    님과같은 경우에는 val procedure를 활용하세염..

    자세한 내용은 헬프화일을 참조하시구요..



    초봉이 wrote:

    > 안녕하세요?

    >

    > Edit1 에 text 를 입력하고 버튼을 눌렀을때 숫자만 8글자 있으면

    >

    > showmessage('ok');

    >

    > 숫자외에 다른문자가 있으면

    >

    > showemssage('no');

    >

    > 이렇게 하려고 하는데 잘 안되네요...

    >

    > 도와주세요...