请教TTcpServer怎么给tcpClient发送信息

Question

请教一下TTcpServer怎么给tcpClient发送信息，我使用TcpServer.sendln('测试'); 发送信息，可是s:=TcpClient.receiveln();   接收不到信息，请问一下怎么激活Onreceive事件，谢谢了。
----------------------------------
网上搜索了一下，是这样写的 
问题：为什么TcpClient的OnReceive事件不响应服务器传回的数据？
原因很简单，OnReceive事件是由TcpClient的Receiveln等函数激发的，用于在Receiveln等函数接受到数据之前过滤数据用。
因此，如果你不调用TcpClient的Receiveln等函数，OnReceive事件就永远不会被激发。
------------------------------------
我不知道怎么去激发那个事件，有人知道告诉我一下，小弟很是感谢。 

Answer 1

client至少要向server请求一次之后server才能发送数据吧
或者至少在server的client的链接事件里面

Answer 2

IdTCPClient1.host := 127.0.0.1 //服务端的ip;
IdTCPClient1.port := 8808      //服务端的端口
IdTCPClient1.Connect(5000);    // 连接if IdTCPClient1.Connected then // 如果连接成功的话发送
  IdTCPClient1.WriteLn('nihao'); //发送字符串