Delphi 2009 新增的一个小函数: SysUtils.ByteLength

来源:互联网 发布:读卡器端口打开失败 编辑:程序博客网 时间:2024/05/21 01:32
procedure TForm1.FormCreate(Sender: TObject);var  str: string;begin  str := '万一';  ShowMessageFmt('%d, %d', [Length(str), ByteLength(str)]); {2,4}end;

0 0
原创粉丝点击