Delphi XE8下 Indy使用：IdTCPClient

IdTCPClient这个控件在XE8里面和以前的代码感觉完全不一样了，研究了一下，基本通讯模式如下：

首先防止IdTCPClient和IdAntiFreeze在界面上，uses里面包含一下IdGlobal

TCP连接：
begin
    IdTCPClient1.Host := '127.0.0.1';
    IdTCPClient1.Port := 10000;
    try
        IdTCPClietn1.Connect;
    except
        on E: Exception do
        begin
            if Pos('10038', E.Message, 1) > 0 then
            begin
                //手动取消的连接
            end
            else
         &nb