Q&A

  • 입력한 내용이 문자인지 정수인지 어떻게 알아내나요?
제가 edit1은 문자를 입력받고,
edit2는 정수를 입력받도록 하려고 하는데요.

제가 만약에 실수로 edit1에 정수를 입력해버리고
edit2에 문자를 입력해버렸을 때,

이것이 잘못되었음을 판별하려고 하거든요.

edit에 저장된 값이 문자인지, 정수인지를 판별할 수 있는 방법을 좀 가르쳐 주세요.

넘 초보라서 늘 많은 도움만 받네요.
진심으로 감사드리고 있구요. 열심히 배울려고 합니다.
문제는 모르는게 너무 많다는 거겠죠.

고수님들의 도움 말씀 기다릴께요.
꼭 좀 도와주셔요.

밤이 깊었네요.
푹~~~~ 주무시고, 내일도 즐프 하셔요. 답변도 주시구.....
이 게시물을
3  COMMENTS
  • Profile
    최은석 • 2002.04.24 03:07
    StrToIntDef 함수를 사용하시면 됩니다.

  • Profile
    이화 • 2002.04.23 18:41
    KeyPress 이벤트를 사용하시면 될것 같은데요..

    begin
       if ( key >= #48 ) and ( key <= #57)  then  // 숫자
       begin
          
       end;
    end;

    즐거운 하루 되세요..



  • Profile
    BravoJW • 2002.04.23 23:34
    StrToIntDef함수를 쓰셔도 되지않을까요?
    function StrToIntDef(const S: string; Default: Integer): Integer;
    → S가 문자이면 Default값이 지정되고
        S가 숫자이면 S값이 지정됩니다.

    procedure TForm1.Button1Click(Sender: TObject);

    var
      Number: Integer;
    begin
      Number := StrToIntDef(Edit1.Text, 1000);
      Edit2.Text := IntToStr(Number);
    end;
←First Page
1043 1044 1045 1046 1047 1048 1049 1050 1051 1052
Last Page→
한델 로그인 하기