如果监听端口被占用，依然会返回成功的问题

[im-starrain]

GateSocket.Start( procedure(const AListen: ICrossListen; const ASuccess: Boolean) begin if not ASuccess then begin Application.MessageBox('监听端口被占用，请更换监听端口后重新启动！！！', '提示信息', MB_OK + MB_ICONERROR); Exit; end; end );