delphi保文本文件怎么选择编码UTF-8格式

delphi保文本文件怎么选择编码UTF-8格式

如果是 delphi 高版本，比如 delphi xe 及以上，对 utf8 支持比较广泛，这时，直接就可以保存为 utf8，而低版本的 delphi，可以尝试以下功能函数代码：
procedure SaveUTF8File(AContent:WideString; AFileName:string);
var
    ffileStream: TFileStream;
    futf8Bytes: AnsiString;
    S: AnsiString;
begin
    ffileStream := TFileStream.Create(AFileName, fmCreate);
    futf8Bytes := UTF8Encode(AContent);
    S := #$EF#$BB#$BF;
    ffileStream.Write(S[1], Length(S));
    ffileStream.Write(futf8Bytes[1], Length(futf8Bytes));
    ffileStream.Free;
end;