TTCPServer三种通讯模式

最新推荐文章于 2021-05-25 10:28:45 发布

原创最新推荐文章于 2021-05-25 10:28:45 发布 · 473 阅读

CC 4.0 BY-SA版权

本文详细介绍了TTCPServer的三种通讯模式：阻塞、非阻塞与线程异步模式，并提供了在不同模式下编写代码的方法。重点在于帮助开发者理解如何根据实际需求选择合适的模式来优化网络通讯效率。

1.通过设置TTCPServer的BlockMode属性,可以设定TTCPServer为bmBlocking\bmNonBlocking\bmThreadBlocking这三种通讯模式;

bmBlocking    为阻塞模式,以同步的方式进行数据传输,
bmNonBlocking  非阻塞模式,以异步的方式进行数据传输,
bmThreadBlocking 线程异步模式,创建一个子线程与TcpClient进行通讯,在线程中以同步的方式传输数据;

默认是bmThreadBlocking 模式;

2.应该检查一下你的通讯模式

如果是bmBlocking模式,可以OnAccept事件中编写代码
procedure TForm1.TcpServer1Accept(Sender: TObject;
  ClientSocket: TCustomIpClient);

  //接收tcpclient的数据
  ClientSocket.ReceiveFrom()
  ClientSocket.ReceiveBuf()

  //向tcpclient发送数据
  ClientSocket.SendBuf()
  ClientSocket.SendTo()

3.如果是bmThreadBlocking模式,可以OnGetThread事件中编写代码
procedure TForm1.TcpServer1GetThread(Sender: TObject;
  var ClientSocketThread: TClientSocketThread);
begin
  ClientSocketThread.ClientSocket.

  //接收tcpclient的数据
  ClientSocketThread.ClientSocket.ReceiveFrom()
  ClientSocketThread.ClientSocket.ReceiveBuf()

  //向tcpclient发送数据
   ClientSocketThread.ClientSocket.SendBuf()
   ClientSocketThread.ClientSocket.SendTo()

end;