Q&A

  • 델파이5, Edit창에서 입력받은 한글을 숫자로 변환하기
[델파이 5] Edit창에서 입력받은 한글( 가~ 바) 를 숫자로 변환하여
처리하고 싶은데 입력하고 처리버튼을 누르면
Integer 값이 아니라고 에러가 납니다.

어떻게 해야 하는지 알고싶습니다.

조언 부탁드리겠습니다.

수고하세요.
2  COMMENTS
  • Profile
    yosule 2003.05.23 08:45

    var
       i : Integer;
    begin
       i := StrToInt(Edit1.Text);

    위와 같은 형식으로 했나요? 질문이 애매해서 답변하기가 어렵군요.
    문자열을 숫자로 바꾸기 위해서는 문자열 숫자가 되어야 합니다.
    예를들어 '1', '100' 같이요...

    일단 함수를 하나 만드세요.

    function HanToInt(Han : String) : Integer;
    begin
       if Han = '가' then result := 1
       else if Han = '나' then result := 2;
       .
       .
       .
    end;

    제가 생각해서 내린 답변이 맞을지 모르겠네요.
  • Profile
    이성수 2003.05.24 10:22
    일단 답변주신 분께 감사드리고...

    제 질문에 조금 오류가 있었군요..문제는 Edit  Component가 한글을
    제대로 인식하지 못하는 것 같습니다.

    제가 실험한 코드입니다.
    (1) if Edit.text = '가' then Num := 1;
    (2) if StrCmp(Edit.text, '가') = 0 then Num := 1;

    위와 같이 해도 계속 Edit Component에서 '가'는 Integer 값이 아니다
    라는 에러가 납니다.

    (3) Edit2.text := Edit1.text

    위와 같이 하고 Edit1에 '가'를 입력하여도 똑같은 에러가 납니다.
    Component의 속성을 바꿔줘야 하는게 아닌가요?
    조언 부탁드리겠습니다.

    [에러메세지]
    => Project sales.exe raised exception class EConvertError with message
        ''가'is not a valid integer value'. Process stopped. Use Step or Run
         to continue.