怎么样在delphi中将汉字区位码或机内码转换为unicode码? ( 积分: 100 )

S

soulmate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-18

• #1

由区位码的区码和位码分别加上0xA0即为机内码?可是怎样能将汉字区位码或机内码转换为unicode码?
我主要是在GPRS远传通信中用到~

 

S

soulmate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-18

• #2

由区位码的区码和位码分别加上0xA0即为机内码?可是怎样能将汉字区位码或机内码转换为unicode码?
我主要是在GPRS远传通信中用到~

 

M

maxim88

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #3

function HZToUnicode(hz: string): string;
var
s:string;
i:integer;
j,k:string[2];
a:array [1..1000] of char;
begin
s:='';
StringToWideChar(hz,@(a[1]),length(hz));
for i:=1 to (length(hz)div 2) do s:=s+a[i*2]+a[i*2-1];
result:=s;
end;

 

C

cjmcn-sh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #4

或者用DELPHI6中的FASTNAT组件nmurl实现

 

X

xianguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #5

http://www.delphibbs.com/keylife/iblog_show.asp?xid=13397

 

S

soulmate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-23

• #6

大富翁藏龙卧虎啊~我问的问题总有人解答~感动啊~兄弟~^o^