5,386
社区成员
发帖
与我相关
我的任务
分享
var
strCommand : AnsiString;// 使用WideString,AnsiChar数组也是一样显示乱码
begin
strCommand := '这是一条测试信息!';
IdTCPClient.Connect;
IdTCPClient.IOHandler.Writeln(strCommand); // 服务端显示乱码,另外服务端回送的信息“已经接收成功”,到delphi 客户端这边也显示乱码
strResult := IdTCPClient.IOHandler.ReadLn(enUTF8);
ShowMessage(strResult);
end