字符串函数大全(48) $[SysUtils.pas 功能 返回字符串S位置Index上的字符在MBCS中类型 说明 多字节字符系统:Multi-Byte Character System (MBCS) 参考 var SysUtils.SysLocale 例子 SpinEdit1.Value := Ord(ByteType(Edit1.Text, SpinEdit2.Value)); ━━━━━━━━━━━━━━━━━━━━━ 首部 function StrByteType(Str: PChar; Index: Cardinal): TMbCSByteType; $[SysUtils.pas 功能 返回指针字符串Str位置Index上的字符在MBCS中类型 说明 Index从0开始 参考 var SysUtils.SysLocale 例子 SpinEdit1.Value := Ord(StrByteType(PChar(Edit1.Text), SpinEdit2.Value)); ━━━━━━━━━━━━━━━━━━━━━ 首部 function ByteToCharLen(const S: string; MaxLen: Integer): Integer; $[SysUtils.pas 功能 返回字符串S中有多少个多字节字符 说明 MaxLen指定处理字符个数 参考 function SysUtils.ByteToCharIndex 例子 SpinEdit1.Value := ByteToCharLen(Edit1.Text, SpinEdit2.Value); ━━━━━━━━━━━━━━━━━━━━━ 首部 function CharToByteLen(const S: string; MaxLen: Integer): Integer; $[SysUtils.pas 功能 返回字符串S中有多少个字符 说明 MaxLen指定处理多字节字符个数 参考 var SysUtils.SysLocale