求汉字的ANSI码 和 汉字的UNICODE码的转换 原理。

DJMPH 2003-07-22 12:39:08
比如‘曹’的
UNICODE码是 0xF966
ANSI码是 0xB2DC
他们是怎么互相计算出来的?
...全文
87 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
tiexinliu 2003-07-22
  • 打赏
  • 举报
回复
下面是实现中文ANSI编码到UNICODE代码:
// 中文格式编码,s为Unicode String
function Encode2(var s:WideString):String;
var i,len:Integer; cur:Integer; t:String;
begin
Result:=‘’;
len:=Length(s);
i:=1;
while i<=len do
begin cur:=ord(s[i]); //BCD转换 FmtStr(t,‘%4.4X’,[cur]);
Result:=Result+t;
inc(i);
end;
end;
看看吧

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧