XE7下Indy10TIdTCPClient与TIdTCPServer发送字符串

网上很多的TIdTCPServer 和 TIdTCPClient ，无奈很多都不支持中文消息，发送中文消息都出现很多?? ,故有空做了2个Demo，以便大家参考！Delphi的开发资料越来越少了，希望大家把自己的技术都公布出来，让越来越多的人选择Delphi开发。