IdTCPServer心跳设置

weixin_30488085

于 2011-03-26 10:36:00 发布

阅读量242

点赞数

原文链接：http://www.cnblogs.com/fyen/archive/2011/03/26/1996156.html

版权

本文介绍了一种在TCP连接中启用KeepAlive功能的方法，并通过一段Delphi代码示例展示了如何设置KeepAlive的时间间隔参数。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

procedure TForm1.IdTCPServer1Connect(AThread: TIdPeerThread);
type
  TCP_KeepAlive = record
    OnOff: Cardinal;
    KeepAliveTime: Cardinal;
    KeepAliveInterval: Cardinal
  end;
var
  Val: TCP_KeepAlive;
  Ret: DWord;
begin
  Val.OnOff:=1;
  Val.KeepAliveTime:=xxx;
  Val.KeepAliveInterval:=xxx;
  WSAIoctl(AThread.Connection.Socket.Binding.Handle, IOC_IN or IOC_VENDOR or 4,
    @Val, SizeOf(Val), nil, 0, @Ret, nil, nil)
end;

转载于:https://www.cnblogs.com/fyen/archive/2011/03/26/1996156.html