C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[58767] Re:Re:Re: 마지막 질문입니다!! ㅠ
이민준 [canfly35] 1055 읽음    2009-10-13 21:40
감사합니다. 드디어 원활히 실행이 되네요 !!
마지막으로   숫자대신 알파벳이나 문자를 입력할 경우 0으로 바뀌도록 해야하는데
일단 알파벳 입력할 경우라도 해결하게 cctype헤더파일에 있는 isalpha()를 이용하여 아래와같이 해봤는데
여의치 않네요..  도와주세요ㅠ


-------------------------------------------------------------------------------------: :
: :
: : : :
: :
: : void __fastcall TForm1::Button1Click(TObject *Sender)
{
    double no1,no2;
    AnsiString oprator;

    no1=num1->Text.ToDouble();
    no2=num2->Text.ToDouble();
    oprator=oprtor->Text;

 
if (isalpha(no1))
    {no1=0;}
   if (isalpha(no2))
    {no2=0;}



    if (oprator=='+') {

    this->result->Caption=AnsiString(no1+no2);

    }

    else if (oprator=='-') {
            this->result->Caption=AnsiString(no1-no2);
                                                        }
   else if (oprator=='*') {
            this->result->Caption=AnsiString(no1*no2);
                                                        }

        else if (oprator=='/')
        {
           if (no2!=0) {
                this->result->Caption=AnsiString(no1/no2);
           }
          else if (no2==0)
              {ShowMessage(" You have to put non-zero numbers");                                            }
                                      }


}

+ -

관련 글 리스트
58763 VCL로 계산기 만드는 중인데 막히고 있습니다 ㅠㅠㅠㅠ 이민준 1313 2009/10/13
58764     Re:VCL로 계산기 만드는 중인데 막히고 있습니다 ㅠㅠㅠㅠ 장성호 1246 2009/10/13
58765         Re:감사합니다 !!!!!!! 질문이 하나 더 있습니다. 이민준 1254 2009/10/13
58766             Re:Re:감사합니다 !!!!!!! 질문이 하나 더 있습니다. 김진호.불사새 2855 2009/10/13
58767                 Re:Re:Re: 마지막 질문입니다!! ㅠ 이민준 1055 2009/10/13
58768                     Re:Re:Re:Re: 마지막 질문입니다!! ㅠ 김진호.불사새 992 2009/10/13
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.