去看一看ByteType这个函数。
解决方案 »
- 用ADO能够备份但是不能恢复,也不报错,请高手看看!!!!!
- 主窗体的界面问题,我要让mdilchildform出现在panel上面.
- 日期,太烦人了,帮帮我吧
- 怎么在繁體系統下用拼音輸入簡體
- TIdSMTP控件发邮件的问题!发言就送分!快来拿分吧!
- delphi bde 连接oracle 问题;在线等待
- quickreport报表可以保存为图片格式的?!
- 写了HOOK 程序,谁知道有关F4的代码值,比如
- 在哪可以找到有关ISO 层次结构的详细中文资料?
- 哪位大侠有简体中文与繁体中文之间转换的算法?
- ★★★这难道是Delphi 6.0的BUG?★★★(详情请进)
- 大家在开发程序时,自带的控件和第三方控件那一个使用率高???
两个字节,该双字节的高字节的值是特殊的,如果遇到这样的情况,就读两个字节,指针移动两个字节,判断接下来的字节,如果为ASCAL吗值则读一个字符,表示一个字符,指针移动一个字节,我建议你看看有关UNICODE 编码的书,可能会解决吧
s:widestring;
ss:='s动力';
s:=ss;
//s[1]=s;s[2]=动
s:='asdf犯得fd上法kfdja';
eng:='';
chi:='';
i:=1;
while i<=length(s) do
begin
if 65<=ord(s[i])<=90 and
97<=ord(s[i])<=122 then
eng:=eng+s[i]
if 161<=ord(s[i])<=21?) then
begin
chi:=chi+s[i];
inc(i);
chi:=chi+s[i];
end;
inc(i);
end;
天呐,合着我白说啦,去看看ByteType这个函数。