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
[25468] [자료] 16진수를 2진수로(볼랜드 뉴스 그룹의 답변 자료)
정성훈.해미 [sage5nor] 1192 읽음    2003-05-06 12:29
Remy Lebeau (TeamB)님이 답변해주신 자료의 일부입니다.
테스트는 안해 봤다는 군요....

[첨부자료] newsgroups.borland.com의 borland.public.cppbuilder.students ------------

You'll have to convert it manually, for example (untested):


bool __fastcall HexToBinary(AnsiString Hex, AnsiString &Binary)
{
    static char* HexBinaryLookup[] = {"0000", "0001", "0010", "0011",
                                      "0100", "0101", "0110", "0111",
                                      "1000", "1001", "1010", "1011",
                                      "1100", "1101", "1110", "1111"};

    Binary = "";
    if( Hex.SubString(1, 2).AnsiCompareIC("0x") == 0 )
        Hex.Delete(1, 2);

    for(int i = 1; i <= Hex.Length(); ++i)
    {
        char c = Hex[i] & ~20;    // simple way to force uppercase
        int index = -1;
        if( (c >= '0') && (c <= '9') )
            index = (c - '0');
        else if( (c >= 'A') && (c <= 'F' ) )
            index = (c - 'A' + 10);
        else
            return false;    // invalid input

        Binary += HexBinaryLookup[index];
    }
    return !Binary.IsEmpty();
}

Then you can do something like this:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    AnsiString binary;

    if( HexToBinary(Edit1->Text, binary) )
        Edit2->Text = binary;
    else
        ShowMessage("Please enter a valid hex value!");
}

Gambit

---------------------------------------------------------


+ -

관련 글 리스트
25468 [자료] 16진수를 2진수로(볼랜드 뉴스 그룹의 답변 자료) 정성훈.해미 1192 2003/05/06
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.