delphixe5 android,Delphi XE5 Android手机端转换Ansi字符串
大家好,又见面了,我是你们的朋友全栈君。
介绍
本文章介绍了Delphi XE5 Android手机端转换Ansi字符串,本代码是“浙江-樵夫”开发的一个程序,用来对字符串进行转换,主要代码是:
// 读入Ansi(简体中文)文件…
procedure TForm1.CornerButton3Click(Sender: TObject);
var
Stream: TMemoryStream;
begin
Stream:=TMemoryStream.Create;
Stream.LoadFromFile(TPath.GetPublicPath+’/testfile.txt’);
SetLength(Data1,Stream.Size);
Stream.read(Data1,Stream.Size);
memo1.Lines.Add(‘读入Ansi文件成功!长度=’+inttostr(length(Data1))+’字节’);
FreeAndNil(Stream);
end;
//
// ANSI(简体中文) –> Default…
procedure TForm1.CornerButton4Click(Sender: TObject);
begin
StringValue:=StringOf(TEncoding.Convert(TEncoding.GetEncoding(936),TEncoding.Default,Data1));
memo1.Lines.Add(‘转换成手机字符串成功!共’+inttostr(Length(StringValue))+’字符’);
memo1.Lines.Add(StringValue);
end;
//
// Default –> Ansi(简体中文)…
procedure TForm1.CornerButton5Click(Sender: TObject);
begin
Data2:=TEncoding.Convert(TEncoding.Default,TEncoding.GetEncoding(936),bytesof(StringValue));
memo1.Lines.Add(‘转换为Ansi串成功!长度=’+inttostr(length(Data2))+’字节’);
end;
//
// ANSI写回文件…
procedure TForm1.CornerButton6Click(Sender: TObject);
var
Stream: TMemoryStream;
begin
Stream:=TMemoryStream.Create;
Stream.Write(Data2,length(Data2));
Stream.Position:=0;
Stream.SaveToFile(TPath.GetPublicPath+’/testfile.txt’);
FreeAndNil(Stream);
memo1.Lines.Add(‘ANSI串写回文件成功!’);
end;
//
// 清屏…
procedure TForm1.CornerButton7Click(Sender: TObject);
begin
Memo1.Lines.Clear;
end;
//
// 程序启动时,显示编码参数…
procedure TForm1.FormCreate(Sender: TObject);
begin
if TEncoding.Default=TEncoding.Unicode then
memo1.Lines.Add(‘TEncoding.Default=Unicode’);
if TEncoding.Default=TEncoding.ANSI then
memo1.Lines.Add(‘TEncoding.Default=ANSI’);
if TEncoding.Default=TEncoding.UTF7 then
memo1.Lines.Add(‘TEncoding.Default=UTF7’);
if TEncoding.Default=TEncoding.UTF8 then
memo1.Lines.Add(‘TEncoding.Default=UTF8’);
memo1.Lines.Add(‘系统就绪,请继续测试…’);
memo1.Lines.Add(”);
end;
发布者:全栈程序员栈长,转载请注明出处:https://javaforall.cn/161325.html原文链接:https://javaforall.cn
相关文章
- Android自定义View之declare-styleable记录[通俗易懂]
- android 验证码短信验证码,Android短信验证码倒计时验证的2种常用方式
- 【Android布局】在程序中设置android gravity 和 android layout Gravity属性
- android调用相册并显示图片_Android获取相册列表
- android进程间通信的方式_Android进程注入
- Android OpenCV 4.6.0 颜色追踪
- android状态栏样式修改
- Android studio更新后出现警告:Warning:The `android.dexOptions.incremental` property is deprecated and it has
- 【Android NDK 开发】JNI 方法解析 ( 字符串数组参数传递 | 字符串遍历 | 类型强转 | Java 字符串与 C 字符串转换 | 字符串释放 )
- 【Android FFMPEG 开发】FFMPEG 直播功能完整流程 + 源码 ( 源码交叉编译 -> AS工程配置 -> 音视频打开/读取/解码/格式转换 -> 原生绘制播放 -> 音视频同步 )
- 【Android Gradle 插件】Module 目录下 build.gradle 配置文件 ( android 闭包块配置 | AppExtension 扩展类型参考文档 )
- 【错误记录】编译 Android 版本的 ijkplayer 报错 ( ./init-android.sh: 第 37 行: cd: android/contrib/: 没有那个文件或目录 )
- Android分页加载刷新AsyncListUtil中DataCallback的refreshData()详解手机开发
- Android控制文字水平间距android:letterSpacing详解手机开发
- 利用任务调度特性检测Android模拟器
- Android源码学习之工厂方法模式应用及优势介绍
- android实现获取正在运行的应用程序
- Android录音应用实例教程