关于字符串的问题(50)

当一个字符串出现双字节字符时，怎样截取字符串左边指定长度的字符串？例如，我要截取字符串的前N-1的字符。N是用strlen函数取的长度值。var:charstr:string;begincharstr:='TL5001161 000009重庆 1111111111111199,'showmessage(leftstr(charstr,strlen(Pchar(charstr))-1));end；显示结果不正确，但如果不含双字节字符，charstr:='TL5001161 000009aa 1111111111111199,'就可以得到正确的结果，各位大侠介绍哈这个问题怎么解决呢？

直接用COPY函数来做。你用的LEFTSTR里都转换成WideString了

格式固定的话,用Record配合指针就OK

var:charstr:ansistring 可以把汉字当成2个字符

多人接受答案了。