Q&A

  • 에디트 창에 입력값 숫자 인지 문자 인지 구분하기
에디트 창에 입력값이 숫자인지 문자 인지 구분하는 방법좀 가르쳐 주세용~
ㅠㅠ
넘 해매고 있어요~~~
2  COMMENTS
  • Profile
    석주현 2006.09.21 20:23
    Val 를 이용해 보세요..

    뭐 try except 같은 걸 이용할 수 있겠지만 전 이게 편하더군요..

    예제는 델파이 헬프에 있는 겁니다.. ^^

    Val( 입력 스트링 , 얻어오는 값, 코드)

    얻어 오는 값은 Integer, Real 다 되니 알아서 쓰시면 됩니다.. ^^

    <!--CodeS-->
    procedure TForm1.Button1Click(Sender: TObject);
    var
      I, Code: Integer;
    begin
      { Get text from TEdit control }
      Val(Edit1.Text, I, Code);
      { Error during conversion to integer? }
      if Code <> 0 then
        MessageDlg('Error at position: ' + IntToStr(Code), mtWarning, [mbOk], 0)
      else
        Canvas.TextOut(10, 10, 'Value = ' + IntToStr(I));
    end;
    <!--CodeE-->

    그럼 이만 ^^
  • Profile
    유상혁 2006.09.21 22:06
    죄송한데
    try except 로 처리하는 것도 가르쳐 주실수 없나요~~???