Delphi XE8 中TIdTCPClient的WriteLn编码变化!
XE2中正常的代码:
IdTCPClient1.IOHandler.WriteLn(sendData,TEncoding.ANSI);
XE8中不行了,解决方法:
1,引入“IdGlobal ”单元。
2,调整代码:通过IndyTextEncoding() 方法,把TEncoding转换为IIdTextEncoding。
IdTCPClient1.IOHandler.WriteLn(sendData,IndyTextEncoding(TEncoding.ANSI));