在DELPHI中如何使用SOCKET编程中的KEEP_ALIVE选项呢？？能给一段代码吗？？

Question

在DELPHI中如何使用SOCKET编程中的KEEP_ALIVE选项呢？？能给一段代码吗？？

Answer 1

我知道使用setsockopt函数，但是怎么使用呢？？

Answer 2

我使用了KEEP_ALIVE以后，现在要用SIO_KEEPALIVE_VALS选项在函数WSAIoctl中，可是如何定义呢？？

Answer 3

var
  keepalive: tcp_keepalive;
  t: DWORD;
...WSAIoctl(socket, SIO_KEEPALIVE_VALS, @keekalive, SizeOf(tcp_keepalive),
  nil, 0, t, nil, nil);