求字符串的長度

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

>>阅读原文<<