怎样用delphi 实现汉字转ASCII码?

yqsmail 2006-04-17 04:50:05
怎样用delphi 实现汉字转ASCII码?
需要用什么命令?还是要从内存中读取的,具体实现代码,能给我参考一下吗?
谢谢
...全文
388 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
yqsmail 2006-04-17
  • 打赏
  • 举报
回复
我看帮助找到了,英文不好,你们真快,谢谢了
老之 2006-04-17
  • 打赏
  • 举报
回复
汗,好快啊
老之 2006-04-17
  • 打赏
  • 举报
回复
十六进制可以这样:
var s:string;
begin
s:='哈';
ShowMessage(Format('%x %x',[ord(s[1]),ord(s[2])]));
end;
coreblood 2006-04-17
  • 打赏
  • 举报
回复
var s:string;
begin
s:='哈';
showMessage( IntToHexord(s[1],2) + IntToHexord(s[2],2) );
end;
柯本 2006-04-17
  • 打赏
  • 举报
回复
var s:string;
begin
s:='哈';
ShowMessage(Format('%x %x',[ord(s[1]),ord(s[2])]));
end;
yqsmail 2006-04-17
  • 打赏
  • 举报
回复
先谢谢楼上,我需要的是16进制的(不好意思前面没说明)
老之 2006-04-17
  • 打赏
  • 举报
回复
var s:string;
begin
s:='哈';
ShowMessage(Format('%d %d',[ord(s[1]),ord(s[2])]));
end;

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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