16进制和汉字之间的互转！《转》

比眉伴天荒 2021-12-17 02:19 1242阅读 0赞

/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*16进制转汉字\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/  
AnsiString TForm1::Hex\_To\_Chinese(AnsiString Hex)  
\{  
        //中英文数字参杂在一起也可以转换  
        AnsiString ret;  
        for(int i=1; i<Hex.Length()+1; i += 2)  
        \{  
                AnsiString TempStr = "0x" + Hex.SubString(i,2);  
                ret += AnsiString((char)(TempStr.ToInt()));  
        \}  
        return ret;  
\}  
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*16进制转汉字\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/

/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*汉字转16进制\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/  
AnsiString TForm1::Chinese\_To\_Hex(char\* P\_BCD, int iLen)  
\{  
        //中英文数字参杂在一起也可以转换  
        AnsiString ret = "";  
        char hChar, lChar, Temp;  
        for (int i=0; i<iLen; i++)  
                \{  
                Temp = \*P\_BCD++;  
                hChar = (Temp&0xF0)>>4;  
                lChar = (Temp&0x0F);  
                if ((hChar >= 0x00)&&(hChar <= 0x09))  
                        hChar += 0x30;  
                if ((hChar >= 0x0A)&&(hChar <= 0x0F))  
                        hChar += 0x37;  
                if ((lChar >= 0x00)&&(lChar <= 0x09))  
                        lChar += 0x30;  
                if ((lChar >= 0x0A)&&(lChar <= 0x0F))  
                        lChar += 0x37;  
                ret += AnsiString(hChar);  
                ret += AnsiString(lChar);  
        \}  
        return ret;  
\}  
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*汉字转16进制\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/

void \_\_fastcall TForm1::Button4Click(TObject \*Sender)  
\{  
        String strChinese = "中国共浐党万岁";

//D6D0B9FAB9B29BBAB5B3CDF2CBEA 此段为汉字的机内码  
        String strTemp = Chinese\_To\_Hex(strChinese.c\_str(), strChinese.Length());  
        //Chinese\_To\_Hex()此函数转的是机内码 不是GB码

ShowMessage(strTemp);  
        strTemp = Hex\_To\_Chinese(strTemp);  
        ShowMessage(strTemp);  
\};

转载于:https://www.cnblogs.com/LceMeaning/p/4152914.html