Q&A

  • 에디트박스에 숫자만 입력받고싶거던여
에디트박스에 숫자만 입력을 받고싶습니다.
가령 전화번호를 입력하는 곳에 숫자만 입력가능하게 하고싶은데
어떻게 해주면 될까여 아시는분 간단한 예제와 함께좀 알려주세여
그럼 ㄳ하겠습니다.
2  COMMENTS
  • Profile
    강형철 2003.10.18 11:03
    procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
    begin
        // Backspace 와 숫자만 허용
        if not ( Key in [ #8, '0'..'9' ] ) then
            Key := #0;
    end;

    즐프하세요^^
  • Profile
    첨시작델 2003.10.18 18:59
    ㄳ합니다...유용하게 사용하겠습니다.