var
s:string;
lvAnsiStr:AnsiString;
begin
lvAnsiStr := '中国';
Writeln(Length(lvAnsiStr));
lvAnsiStr := UTF8Encode('中国');
Writeln(Length(lvAnsiStr));
s := 'a';
lvAnsiStr := UTF8Encode('中国') + s;
Writeln(Length(lvAnsiStr));
lvAnsiStr := UTF8Encode('中国') + 'a';
Writeln(Length(lvAnsiStr));
此内容由惯性聚合(RSS阅读器)自动聚合整理，仅供阅读参考。 原文来自 — 版权归原作者所有。