delphi 有关unicode转换ansi 的代码
Ansi->Unicode
strUnicode := WideString(strAnsi);
Unicode->Ansi
strAnsi := AnsiString(strUnicode);
我试了试上面的ansi-->unicode 成功 没问题。
但是下面的 unicode类型的文本文件根本就没法读出来啊??
Delphi/Pascal code?123456789 var a:tstringlist; b:TMemoryStream; strunicode:string; stransi:widestring; begin a:=tstringlist.Create ; a.LoadFromFile('c:\a.txt'); strunicode:=a.Text ;//到了这一步就失败了,txt文件里的内容根本导入不了。
d7当然可以解决,不过不如d2009及之后那么方便
你把那段unicode的文本贴上来,是utf-8的吧
下了一个2010精简版……TEncoding.unicode ~~~解决了~~ 困扰了一天的问题
咋感觉心里那么不爽呢。
D7那个文本贴上来没啥意义啊?
我工作的机器在单位 ,现在本机测试。TXT文本文件是自己随便打的一些英文字母。起名A.TXT 。