Delphi10为什么还不支持UNCODE编码？(100)

S

SmallGhost

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-02

• #1

代码：procedure TForm1.Button1Click(Sender: TObject);var s:string;begin Memo1.Lines.LoadFromFile('c:/temp/123.txt'); s := Utf8ToAnsi(Memo1.Lines.Text); ShowMessage(s);end;123.txt文件时一个UNCODE编码的文件，里面的内容就一个"青"字，经过Utf8ToAnsi后什么内容都没有，不知道怎么回事？

 

F

fengfan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-02

• #2

delphi10 默认就是unicode 编码吧？

 

S

SmallGhost

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-02

• #3

不通过Utf8ToAnsi就会乱码的！

 

Y

yongshiok

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-02

• #4

Utf8 不等于 UNCODE编码你试试WideCharToString

 

Y

yongshiok

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-02

• #5

txt文件头有标识符 #$FF#$FE 表明是unicode编码你必须去掉这个标识符 再转换

 

W

wzwcn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-03

• #6

Delphi2010的Memo1.Lines.LoadFromFile的LoadFromFile好象有多个重载的，默认是anis，应该有unionCode的重载

 

H

hs-kill

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-02-06

• #7

memo1.Lines.LoadFromFile('c:/temp/123.txt',TEncoding.Unicode);