5,388
社区成员
发帖
与我相关
我的任务
分享
为什么汉字"张三"通过UTF8编码,UTF8Encode('张三'),变成乱码:"寮犱笁"
而不是这样结果:%E5%BC%A0%E4%B8%89
function TForm1.ToUTF8Encode(str: string): string;
var
s: string;
utf8: UTF8String;
data: ^byte;
i: Integer;
begin
utf8:= Utf8Encode(str);
data:= @utf8[1];
for i:= 1 to length(utf8) do
begin
s := s + format('%%%x',[data^]);
inc(data);
end;
Result := s;
end;