DELPHI中UTF8保存,读取
来源:互联网 发布:黑马程序员入学测试题 编辑:程序博客网 时间:2024/06/06 02:51
procedure TForm1.btn1Click(Sender: TObject);
var
AfileStream:TFileStream;
Autf8Bytes:string ;
s:string;
begin
AfileStream:=TFileStream.Create('c:\abc.txt',fmCreate);
try
Autf8Bytes:=UTF8Encode('我爱你中国');
S := #$EF#$BB#$BF;
AfileStream.Write(s[1],Length(s));
AfileStream.Write(Autf8Bytes[1],Length(Autf8Bytes));
finally
AfileStream.Free;
end;
end;
procedure TForm1.btn2Click(Sender: TObject);
var
AfileStream:TFileStream;
Autf8Bytes:string;
begin
AfileStream:=TFileStream.Create('c:\abc.txt',fmOpenRead);
try
SetLength(Autf8Bytes,AfileStream.Size);
AfileStream.Read(Autf8Bytes[1],Length(Autf8Bytes));
ShowMessage(UTF8Decode(Copy(Autf8Bytes,4,MaxInt)));
finally
AfileStream.Free;
end;
end;
var
AfileStream:TFileStream;
Autf8Bytes:string ;
s:string;
begin
AfileStream:=TFileStream.Create('c:\abc.txt',fmCreate);
try
Autf8Bytes:=UTF8Encode('我爱你中国');
S := #$EF#$BB#$BF;
AfileStream.Write(s[1],Length(s));
AfileStream.Write(Autf8Bytes[1],Length(Autf8Bytes));
finally
AfileStream.Free;
end;
end;
procedure TForm1.btn2Click(Sender: TObject);
var
AfileStream:TFileStream;
Autf8Bytes:string;
begin
AfileStream:=TFileStream.Create('c:\abc.txt',fmOpenRead);
try
SetLength(Autf8Bytes,AfileStream.Size);
AfileStream.Read(Autf8Bytes[1],Length(Autf8Bytes));
ShowMessage(UTF8Decode(Copy(Autf8Bytes,4,MaxInt)));
finally
AfileStream.Free;
end;
end;
- DELPHI中UTF8保存,读取
- delphi 中操作 图片保存读取access数据库
- Delphi中处理UTF8格式的文本
- delphi保存读取utf-8的文本文件
- Delphi中读取INI文件
- VS2013中如何将代码自动保存为UTF8格式
- 保存特殊字符到utf8编码的mysql数据库中
- DELPHI FOR IOS 读取保存应用的配置信息
- delphi如何保存和读取utf-8的文本文件
- delphi实现保存和读取图片的方法
- ifStream读取ANSI/Unicode/Utf8文本保存到string里并转成gbk编码
- MFC读取utf8文件
- DELPHI中读取硬盘的物理序列号
- DELPHI如何读取数据库中jpeg图片
- Delphi中关于读取XML内容
- 在delphi中读取Excel数据
- 读取一个二进制文件保存到数据库中
- webview中cookie的读取与保存
- Android 常用代码片段
- android使用mvp模式实现登陆demo
- 科目三考试项目分类评判标准
- Ant 设置http代理
- ExtJs4.0 Panel实例
- DELPHI中UTF8保存,读取
- 那些年那些人创业失败的经验教训
- 金山手机毒霸工作原理
- nodejs在windows上的配置
- LIGHTOJ 1256 - Word Puzzle(欧拉路)
- 直接拿来用!最火的Android开源项目(一)
- 阮一峰:字符串匹配的Boyer-Moore算法
- Andrid xml解析
- ACM学习_数学基础之数论