保存为UTF-8格式的Txt文件

procedure SaveUTF8File(const AFileName: string; AListText: TStringList); var   Latin1Encoding: TEncoding; begin   Latin1Encoding := TEncoding.GetEncoding(CP_UTF8);   try     AListText.SaveToFile(AFile
相关文章
相关标签/搜索