DELPHI7加载UNICODE编码格式的TXT显示为乱码的解决方法

最新推荐文章于 2021-05-13 11:46:19 发布
最新推荐文章于 2021-05-13 11:46:19 发布
阅读量1k 收藏
点赞数
文章标签： 解决 解决方法 code 加载 unicode
原文链接：https://www.itdaan.com/blog/2015/12/21/a9654f45514f1fa6d9160b506acaa069.html
版权
wangchaoqi1985
关注
delphi tcp utf8_解决Delphi7的自带的UTF-8编码转换函数BUG
weixin_39942033的博客
02-23 468
Delphi7及其以下版本的VCL 只支持Ansi, 所以... WideString 与UTF8String (定义与AnsiString 相同) 并没有办法正确的在VCL 中显示Delphi7自带的utf-8转换函数遇到其无法识别的字符串就返回空。用以下转换函数可以解决这个bugunit util_utf8;interfaceuses Windows;typeUTF8String = Ansi...
XechWic关于Delphi7实现多语言环境unicode支持的方案
10-21
本文是XechWic开发团队关于低版本Delphi(主要是Delphi7)下应用程序支持Unicode实现多国语言版本开发的完整的解决方案
delphi2007 读取得unicode文本显示出来时乱码?
jacknes009的专栏
07-04 1703
正好今天在编程序，把我写的读写unicode及utf-8的函数上传到这里。 utf8Head:   Array[0..2] of Char = (#239,#$bb,#$bf); unicodeHead: Array[0..1] of Char = (#255,#$fe); // read utf8 file function ReadUtf8File(const filena
DELPHI 读取TXT文件unicode乱码
百万软件
04-04 2104
var slr: TStringList; F:TFileStream; S:WideString; i: integer; const FileName='TalkList.txt'; begin F:=TFileStream.Create(FileName,fmOpenRead); I:=F.Size; SetLength(S, I div 2); F.Read...
Delphi7中存储unicode的BUG
chinmusam的专栏
05-04 1334
Delphi7中存储unicode的BUG？ 近日，在用delphi7做unicode的程序时发现了这样一个问题，就是使用TADOCommand组件执行sql语句时，如果sql语句中有unicode字符，存储在数据库里会出现乱码，使用TTntADOQuery也是一样（使用参数方式不会出现乱码，这里只讨论纯sql的方式）。但是TADOCommand本身是支持widestring的呀，Comma
Delphi的unicode输入
Kay's Blog
09-08 4131
有一批法语和西班牙语需要进行格式转换,其实一个map table就完了,但是unicode的输入成了问题.用TEdit可以显示法语的单词,但是西班牙语都成了?,StringToWideChar没法用,google了把,一些人认为delphi的组件不支持unicode,个人感觉{$H-}也许可以支持unicode,TEdit的text是TCaption是string类型,后来down了个Tnt组
中文软件在外文系统中显示乱码问题解决方法
06-06
### 中文软件在外文系统中显示乱码问题解决方法 #### 背景与问题概述 在使用中文软件时，可能会遇到一个常见的问题：当这些软件在外文操作系统（如英文版Windows）上运行时，界面中的中文字符可能出现乱码的情况。...
delphi7调用高版本xe的dll字符串传参示例
11-05
要注意的是，由于Delphi的不同版本可能使用不同的Unicode编码，如Delphi 7使用AnsiString而Delphi XE及以上版本使用UnicodeString，因此在处理字符串时可能会遇到兼容性问题。为了解决这个问题，可以使用`SysUtils`...
UTF8与ansi string转换处理(DELPHI7开发）
03-13
例如，从ANSI String转换到UTF8时，需要确定ANSI编码的基础，然后将其转换为对应的Unicode编码，最后再编码成UTF8。反向转换时，需要先解码UTF8，再根据目标系统或用户的区域设置选择合适的ANSI编码。 总的来说，...
DELPHI自带的VCL都不支持UNICODE字符
12-07
DELPHI自带的VCL都不支持UNICODE字符,上网找了下,发现有个TNT系列的三方控件包支持UNICODE(菜单控件对UNICODE持不好),但没有我很常用的一个控件 TLabeledEdit,自己加上来了.. 装前需安装TntUnicodeControls控件包,且要将包"TntUnicodeVcl_R70.dpk"的 Build Control 设置为非 Rebuild as needed. 本人用D7.
Delphi7-10_DirectUI 支持Unicode.rar
10-01
Delphi7-10_DirectUI 支持Unicode
Delphi的Unicode支持
simple1986_2008的专栏
11-18 885
转自何语的空间 http://blog.csdn.net/formiss/archive/2007/05/30/1630679.aspx 终于搞定了Delphi的Unicode支持(Tnt控件) 收藏 原来是要在FormCreate中加入以下代码:procedure TTntForm1.TntFormCreate(Sender: TObject);begin  //这句很关键.对于平台
关于delphi的程序在英文操作系统下乱码问题
weixin_30737363的博客
12-29 533
由于delphi7编译的程序是非unicode程序（代码页），所有在英文操作系统下会有乱码的问题。 解决方法： 1. 首先在Lageuage中选"Instal files for East Asian Lanuages"，这步一定要做，否则中文就乱码。 2. 区域设置里面的Advanced选默认的非Unicode的程序的的语言解释为Chinese(PRC),Delphi是非Unicode程序...
(转)Delphi读写UTF-8、Unicode格式文本文件
weixin_30343157的博客
09-21 472
在研究PvPGN时发现conf配置文件一些为UTF-8和Unicode格式，这样便可良好的支持多语言，从网上查阅资料后，将读写UTF-8、Unicode文件写了几个最精简的函数，更新后加了是否写文件头的功能，以适应更多需要，注意函数未加防错保护。 参数说明：f文件名、s写入或读取的文件内容、hs文件头、b是否读写文件头。 UTF-8文件写入函数 程序代码 程序代码 proced...
解决Delphi7的自带的UTF-8编码转换函数BUG
weixin_34314962的博客
07-09 2223
Delphi7及其以下版本的 VCL 只支持 Ansi, 所以... WideString 与 UTF8String (定义与 AnsiString 相同) 并没有办法正确的在 VCL 中显示 Delphi7自带的utf-8转换函数遇到其无法识别的字符串就返回空。 用以下转换函数可以解决这个bug unit util_utf8; interface uses Window...
delphi中的unicode转换
zisongjia的博客
05-13 1006
花47星币买的，没有用上，分享到这里，供大家参考！ delphi7调用delphi2009生成的dll文件会出现乱码问题。是unicode的原因 终于找到了转换函数 function AnsiToUnicode(s:string):WideString; var lpWideChar:PWideChar; len:Integer; begin len := ( Length(s) + 1 ) * 2; GetMem(lpWideChar, len); ZeroMemory(lpWideChar, len
delphi语言的TStringList存储中文乱码怎么解决
最新发布
09-09
### 回答1： TStringList 是 Delphi 语言中的一种字符串列表类型。如果在 TStringList 中存储的中文字符出现乱码，则可以尝试以下方法来解决这个问题： 1. 确保 TStringList 的编码格式与存储的中文字符的编码格式相同。可以使用 TStringList.DefaultEncoding 属性来设置编码格式。 2. 尝试使用不同的编码格式来存储中文字符。例如，可以使用 UTF-8 或 GB2312 编码格式来存储中文字符。 3. 如果 TStringList 用于读取文件，请确保文件的编码格式与 TStringList 的编码格式相同。可以使用 TStringList.LoadFromFile 方法的第二个参数来指定文件的编码格式。 4. 如果 TStringList 用于写入文件，请确保文件的编码格式与 TStringList 的编码格式相同。可以使用 TStringList.SaveToFile 方法的第二个参数来指定文件的编码格式。 5. 如果以上方法都无法解决乱码问题，可以尝试使用其他类型的字符串列表，例如 TEncodingStringList，它具有更强的编码处理能力。 示例代码： ``` uses System.Classes; procedure Test; var StringList: TStringList; begin StringList := TStringList.Create; try StringList.DefaultEncoding := TEncoding.UTF8; StringList.Add('中文'); StringList.SaveToFile('test ### 回答2： 在Delphi语言中，TStringList是用于存储文本字符串的类。中文乱码问题通常是由于编码不一致导致的，我们可以通过以下几种方法来解决TStringList存储中文乱码的问题。 1. 设置正确的编码格式： 在存储中文字符串之前，可以通过设置TStringList的Encoding属性来指定正确的编码格式，例如： ``` StringList1.Encoding := TEncoding.UTF8; // 设置编码为UTF-8 ``` 这样在存储和读取中文字符串时，就会按照指定的编码格式进行处理，避免乱码问题的发生。 2. 使用Widestring类型： TStringList默认存储的是AnsiString类型，不适合存储包含中文字符的字符串。可以考虑改用Widestring类型，例如： ``` var StringList1: TStringList; Str: Widestring; begin StringList1 := TStringList.Create; Str := '中文字符串'; StringList1.Add(Str); // ... end; ``` 这样就可以正常存储和读取包含中文字符的字符串。 3. 显式指定编码转换： 如果存储和读取中文字符串的过程中遇到乱码问题，可以使用TEncoding类进行编码转换，例如： ``` var StringList1: TStringList; Str: AnsiString; NewStr: UnicodeString; begin StringList1 := TStringList.Create; Str := '中文字符串'; NewStr := TEncoding.Convert(TEncoding.Default, TEncoding.UTF8, Str); StringList1.Add(NewStr); // ... end; ``` 上述例子中，将AnsiString类型的Str转换为UnicodeString类型的NewStr，并按指定的编码格式进行存储。 通过以上这些解决方法，可以有效解决TStringList存储中文乱码的问题，确保中文字符串的正常存取和显示。 ### 回答3： Delphi的TStringList是一个用于管理字符串列表的类，但是其默认的字符编码是ANSI编码，而中文字符通常采用的是Unicode编码（UTF-8、UTF-16等）。因此，在使用TStringList存储中文字符时会出现乱码的问题。 解决此问题的方法是将TStringList的字符编码设置为与中文字符所使用的编码一致。首先，可以通过设置TStringList的Encoding属性实现。可以将其设置为UTF-8或UTF-16等Unicode编码格式，具体取决于应用程序的需求。例如，可以使用以下语句将TStringList的编码设置为UTF-8： TStringList1.Encoding := TEncoding.UTF8; 另外，也可以在加载或保存字符串列表内容时使用TFileStream或TStringStream来指定编码格式。通过使用指定的编码格式，可以确保TStringList正确地读取和显示中文字符。以下是一个示例： var StringList: TStringList; FileStream: TFileStream; begin StringList := TStringList.Create; try FileStream := TFileStream.Create('filename.txt', fmOpenRead); try StringList.LoadFromStream(FileStream, TEncoding.UTF8); // 处理字符串列表 finally FileStream.Free; end; finally StringList.Free; end; end; 在这个示例中，TStringList会从TFileStream中以UTF-8编码格式加载内容。使用相同的原理，可以使用TStringStream和其他适当的编码格式来保存和读取中文字符串。 通过这些方法，您可以正确地存储和处理中文字符，避免TStringList存储中文乱码的问题。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值