各位请问,如何返'王'的ASCII,及如何反过来求,由ASCII求汉字字符?
解决方案 »
- 常量的问题
- 第一行“=”附近有语法错误
- turbo delphi试用
- ColorBox控件使用问题
- access数据库恢复的问题,急.
- 程序自动显示出来当前缓冲区中的内容是十进制的数字,如何才能让它显示十六进制的?
- 从DELPHI的小弟BCB那来的,这里的老大们帮忙啊:存储过程的参数传递问题,高手们帮忙看看,一定给分!!
- 那位高手有空,帮我写个sql语句??
- 哪里有indy控件的Demo程序?在线等待,给50分
- 请问windows95下的API与windows98下的API有什么区别??(有没有增加或减少)
- ==========安装DSPack控件错误(缺少DirectShow.dcu),在线等待~~~==========
- 如何实现按扭点击的问题。
我这样实现 ASCII 码的获取。
var
s: String;
c: char;
begin
s := '王';
c := s[1];
Edit1.Text := IntTostr(ord(c));
c := s[2];
Edit1.Text := Edit1.Text + ' ' + IntToStr(Ord(c));
end;用这个方法来获得汉字:
var
s: string;
begin
s := '';
s := Chr(205) + Chr(245);
Edit1.Text := s;
end;
MultiByteToWideChar()
var
Str : String;Str := '王';用
Ord(Str[1]) shl 8 + Ord(Str[2])
即可得到你要的结果
谢谢了,是我搞错了,上面的两个函数一般用于ucs2!