Delphi 字符串中末位是双字节字符的处理(避免最后一位为乱码)


本文整理自网络,侵删。

 当在报表里显示,或文本里显示字符串时,由于长度有限从而要切掉一部分字符,保留前边的,当串中

同时包含单字节和双字节字符时,在切掉串后可能会在末位出现乱码,由于把末位的双字节字符切成了

单字节找成的

需要使用 mbLeadByte  函数来判断

用法如下

Len  := Length(astr);
  if Len >= 20 then    //只显示20个字符
  begin
    if mbLeadByte=ByteType(astr,20) then   //判断第20个字符是否是双字节字符
      astr := Copy(aStr,1,19)                            //是的话取前19个字符就可以了
   else
     astr := Copy(aStr,1,20);                            
  end;

相关阅读 >>

Delphi 系统服务状态获取管理员用户名

Delphi中url的编码与解码,即urlencode的使用

Delphi 用firedac处理sqlite的日期型

Delphi 10.2 创建并使用资源文件

Delphi字符串、数组操作函数

Delphi 监控其它进程

cnpack sqlite tool 2.04

Delphi 开发中遇到的dll问题思考及解决方法

Delphi 64位汇编编程

Delphi 如何让scrollbox的内容与滚动条一起实时滚动

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...