如何实现把中文，转为utf8编码对应的字符 ( 积分: 100 )

新

新手上路吴

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #1

中国 转为E7A0B4E8A7A3这些字符

 

L

LeeChange

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #2

如果是转换为utf8可以直接用AnsiToUTF8函数

如果是转换成E7A0B4E8A7A3之类的样子:
function Convert(const s: string): string;
var
ss: string;
i: Integer;
begin
ss:=AnsiToUTF8(s);
Result:='';
for i:=1 to Length(ss) do
Result:=Result+IntToHex(Ord(s), 2)
end;

 

J

jialiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #3

AnsiToUTF8
UTF8toAnsi

 

新

新手上路吴

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-30

• #4

接受答案了.