IdTCPClient是TCP客户控件,是主动模式的,可以看help的,只用于客户向服务器发送数据。IdSampleServer是服务端控件,自己是服务器,等待客户的数据请求。你不要搞错了。
OnWorkBegin开始发送
OnWork发送中(每发送一个包结束时激活这个事件)
OnWorkEnd发送结束

解决方案 »

  1.   

    ly_liuyang(Liu Yang) :
      明白了! 谢谢但是我的程序需要知道当服务器向IdTCPClient发数据时的事件!
    我想这么做:  新开一道线程,在线程的execute中:
                      while IdTCPClient.Connected do
                      begin
                        s:=IdTCPClient.ReadLn();
                        //一些处理
                      end;这样子可不可以?
      

  2.   

    while IdTCPClient.Connected do
    begin
      //winsock.select
      //indy的idtcpclient.select,好像有,没用过,大概是这样做。
      //msgWaitForMutipleObjects
      //上面的函数都是等待数据到来,到了一定时间后还没数据的话,就Timeout,看help
       s:=IdTCPClient.ReadLn();
       //一些处理
    end;