埇 mysql 不认这个字_输入法项目->用delphi生成GBK 中文编码 GBK 扩充汉字编码表(3) GBK/3: $8140 —$A0FE(部分)...

GBK 中文编码

GBK是GB2312的扩展，是向上兼容的，因此GB2312中的汉字的编码与GBK中汉字的相同。另外，GBK中还包含

繁体字的编码。GBK中每个汉字包含两个字节，第一个字节的范围是0x81-0xFE(即129-254)，第二个字节的范围是

0x40-0xFE(即64-254)。GBK中有码位23940个，包含汉字21003个;

GBK/3: 0x8140~0xA0FE(部分) 扩充汉字   包括繁体

procedure

Tfm_Words.Button3Click(Sender: TObject);

var

  A, B: Cardinal;

  I, J: Integer;

  sHex:

string

;

  s1: WideString;

  ss:

string

;

//

GBK

/

3

: 0x8140~0xA0FE(部分) 扩充汉字

begin

 

  ss :

=

#

13

#

10

+

'

GBK/3: $8140 —$A0FE(部分) 扩充汉字

'

#

13

#

10

+

'

jfyes 2008-07-07

'

#

13

#

10

#

13

#

10

;

for

I:

=

$

81

to

$A0

do

begin

for

J :

=

$

40

to

$FE

do

begin

       sHex :

=

Format(

'

$%.2x%.2x

'

, [I, J]);

       A :

=

SysUtils.StrToIntDef(sHex,

0

);

       

if

J

=

$

40

then

         ss :

=

ss

+

'

code  +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F

'

;

if

J

in

[$

40

, $

50

,$

60

, $

70

, $

80

,$