delphi 与 c# 生成不带BOM的UTF8文件

演示环境为delphi xe2 与 vs 2015社区版

delphi方式1-传统方式

var ffileStream:TFileStream;

futf8Bytes: string;

S: string;

begin

ffileStream:=TFileStream.Create(AFileName,fmCreate);

futf8Bytes:= UTF8Encode(AContent);

//S:=#$EF#$BB#$BF; //utf8 bom头

//ffileStream.Write(S[1],Length(S));

ffileStream.Write(futf8Bytes[1],Length(futf8Bytes));

ffileStream.Free;

end;

delphi方式2-推荐方式

var lst_s:TStrings ;

s:UTF8String;

....

lst_d.Add(s);

lst_d.WriteBOM := False;//指定不带BOM

lst_d.SaveToFile('G:\docs\utf8test.txt', TEncoding.UTF8);

c#代码

//UTF-8（带BOM）：

writer = New StreamWriter(FilePathName, True, System.Text.UTF8Encoding.UTF8)

UTF-8（不带BOM）：

writer =New StreamWriter(FilePathName, True, New UTF8Encoding(False))

顺便吐槽一下这个语言着色，不支持 delphi(pascal)也就算了毕竟过气了，c# (cs)怎么也不行呢。

————————————————

原文链接：https://blog.csdn.net/chinawcs/article/details/89576989

推荐分享