求字符串的长度

var   s:string;   lvAnsiStr:AnsiString; begin   lvAnsiStr := '中国';   Writeln(Length(lvAnsiStr));   lvAnsiStr := UTF8Encode('中国');   Writeln(Length(lvAnsiStr));   s := 'a';   lvAnsiStr := UTF8Encode('中

>>阅读原文<<