摘要： var s:string; lvAnsiStr:AnsiString; begin lvAnsiStr := '中国'; Writeln(Length(lvAnsiStr)); lvAnsiStr := UTF8Encode('中国'); Writeln(Length(lvAnsiStr)); s := 'a'; lvAn... 阅读全文