用Delphi写一个UTF8编码格式的文本文件
...
var f: TextFile;
beginAssignFile(f, 'test.txt');Rewrite(f);write(f, #$EF+#$BB+#$BF); // UTF-8 BOM。关键就是写入这个UTF-8的BOM, BOM 是 Bype Order Mark 的缩写。writeln(f, UTF8Encode('中文'));CloseFile(f);
...
在delphi中TextFile对象创建文件时默认是 ANSI 编码。 这样中文或者其他非英文字符显示的时候就会变成乱码。
以上是生成一个UTF8编码的文本文件的代码。
Byte Order
Mark
转载于:https://www.cnblogs.com/ldxsuanfa/p/10746882.html
用Delphi写一个UTF8编码格式的文本文件相关推荐
- 如何写一个不带BOM的UTF8文件
大多数情况下,我们并不关心UTF8文件是否带BOF.可是今天突然要写一个UTF8文件,但不需要带BOF.实现方法如下: 在用StreamWriter构造的时候不要传系统默认的Encoding.UTF8 ...
- 一个Delphi写的DES算法, 翻译成C#
其实.NET Framework已经提供实现DES算法的类: System.Security.Cryptography.DESCryptoServiceProvider.之所以要把一个Delphi写的 ...
- 利用输入输出流及文件类编写一个程序,可以实现在屏幕显示文本文件的功能,类似DOS命令中的type命令
利用输入输出流及文件类编写一个程序,可以实现在屏幕显示文本文件的功能,类似DOS命令中的type命令 package p1;import java.io.BufferedReader; import ...
- 2022-11-10:写一个 bash 脚本以统计一个文本文件 words.txt 中每个单词出现的频率。 为了简单起见,你可以假设: words.txt只包括小写字母和 ‘ ‘ 。 每个单词只由小写
2022-11-10:写一个 bash 脚本以统计一个文本文件 words.txt 中每个单词出现的频率. 为了简单起见,你可以假设: words.txt只包括小写字母和 ' ' . 每个单词只由小写 ...
- 话说Delphi XE7编写安卓APP还是不错的,一周写一个APP系统
话说Delphi XE7编写安卓APP还是不错的,花了一周写一个APP系统,熟悉delphi开发的,很快就能开发出一个功能完善的APP系统,该系统的简单介绍, 为了配合我们的酒店系统的应用扩展, ...
- 通过代码创建一个文件a.txt 然后写一个方法,控制台循环输入内容,然后通过gbk的编码格式保存到 a.txt中(要求可以追加),直到输入exit结束 再写一个方法,要求用字符缓冲流读取a.tx
通过代码创建一个文件a.txt 然后写一个方法,控制台循环输入内容,然后通过gbk的编码格式保存到 a.txt中(要求可以追加),直到输入exit结束 再写一个方法,要求用字符缓冲流读取a.txt中的 ...
- 用Delphi写的一个完整OpenGL框架
用Delphi写的一个完整OpenGL框架 program OpenGLFramework; { OpenGL DelphiXE 出处:根据NeHe代码翻译而来(http://nehe.gamedev ...
- 【面试题】写一个脚本统计一个文本文件的行数
原题 写一个脚本来判断a.txt的行数,a.txt的内容如下 [root@laoxin-06 test]# cat a.txt #include <iostream> using name ...
- Delphi写游戏外挂
在几年前我看到别人玩网络游戏用上了外挂,做为程序员的我心里实在是不爽,想搞清楚这到底是怎么回事.就拿了一些来研究,小有心得,拿出来与大家共享,外挂无非就是分几种罢了(依制作难度): 1.动作式,所谓动 ...
最新文章
- C 实现strcpy函数
- iptables 流量速率控制
- Boost:BOOST_ASSERT用法的测试程序
- 【译】Celeste 手感的 10 个设计细节
- orcle rac启动了,但数据库没有启动的错误解决
- 去BAT面试完的Mysql面试题总结(55道)
- 计算机的特点 分类及其应用,2016计算机知识:计算机的特点、分类及其应用(1)...
- 80年代出生人坦白十大尴尬事80一代全搜集
- JavaScript 设计模式核⼼原理与应⽤实践 之 创建型:工厂模式·抽象工厂——理解“开放封闭”
- laravel 5.2 Auth用户认证教程
- datetime(0) NULL DEFAULT NULL报错
- mysql在查询结果列表前添加一列递增的序号列(最简)
- Linux通过UUID挂载和卸载硬盘
- Linux system PXE网络环境
- 苹果鼠标驱动_一款鼠标让工作更高效——咪鼠S2智能语音鼠标测评
- 计算机应用技术三级学科,三个计算机专业的区别是什么?
- html js 鼠标变图片大小,js之图片变大变小效果
- 常用域名控制面板地址
- bzoj1208 [HNOI2004]宠物收养所
- fatal: detected dubious ownership in repository at ‘/home/