发送中文短信遇到困难，如何将汉字转换为unicode？(100分)

小

小令

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-06

• #1

如何将汉字转换为unicode？

 

S

SINGLBOY

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-06

• #2

ansitoutf8

 

C

creation-zy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-06

• #3

function UniStr(Str:String):WideString; //WideString is 16bit Unicode characters
begin
Result:=Str;
end;

 

A

Adnil

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-06

• #4

强制转换即可

var
s1: string;
s2: widestring;
begin
s1 := '大富翁';
s2 := widestring(s1);
end;

 

哈

哈利波特

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-06

• #5

up

 

S

sarny

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-14

• #6

求得其区位码发送，接收后还原

 

小

小令

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-31

• #7

多人接受答案了。