ServerSocket的问题，还望大家多多指教！

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);中的参数分别是什么意思？另外我想在别的地方触发该事件，该如何写法？还望指教，谢谢！

解决方案 »

  1.   

    socket参数是指它的通道号
    要触发的话就用clientsocket1发送啊:  clientsocket.socket.sendtext
      

  2.   

    ??
    有这个必要吗，如果有接收到数据就能自动触发该事件，没有数据的话ServerSocket1ClientRead(Sender: TObject;
      Socket: TCustomWinSocket);中的参数则没有任何意义，用一个自定义过程代替就可以了
      

  3.   

    那我现在在ServerSocket的页面上，按下一个确定按纽后，想Socket.SendText（'ok'）给ClientSocket，但好象在确定按纽的Click事件中写ServerSocket1.Socket.SendText('ok')是不行的，不知道这样的情况该如何实现，谢谢！
      

  4.   

    ServerSocket1.Socket.Connections[0].SendText('ok')