怎样用delphi 实现汉字转ASCII码? 怎样用delphi 实现汉字转ASCII码?需要用什么命令?还是要从内存中读取的,具体实现代码,能给我参考一下吗?谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var s:string;begin s:='哈'; ShowMessage(Format('%d %d',[ord(s[1]),ord(s[2])]));end; var s:string;begin s:='哈'; ShowMessage(Format('%x %x',[ord(s[1]),ord(s[2])]));end; var s:string;begins:='哈';showMessage( IntToHexord(s[1],2) + IntToHexord(s[2],2) );end; 十六进制可以这样:var s:string;begin s:='哈'; ShowMessage(Format('%x %x',[ord(s[1]),ord(s[2])]));end; 用PasLibVlc是不是还要安装VLC? sos 怎么拦截一个播放器控件鼠标事件! 跪求:关于在delphi中实现多副大图片的连续播放的问题 给动态生成的控件添加事件的问题,急!! CSDN的问题 请教高手,我都搞了半天了,怎么还没有人解决呀! 急问:如何用MSCOMM输出非字符型的数据(如WORD,双字等)? 紧急求助关于IE的问题 与数据库连接的问题 哪里有比较注册表工具? 如何捕获tab键 关于delphi通过adsl访问远程数据库的问题(悬赏100分)
begin
s:='哈';
ShowMessage(Format('%d %d',[ord(s[1]),ord(s[2])]));
end;
begin
s:='哈';
ShowMessage(Format('%x %x',[ord(s[1]),ord(s[2])]));
end;
begin
s:='哈';
showMessage( IntToHexord(s[1],2) + IntToHexord(s[2],2) );
end;
var s:string;
begin
s:='哈';
ShowMessage(Format('%x %x',[ord(s[1]),ord(s[2])]));
end;