首先转载一篇关于心跳的博文解释：
所谓的心跳包就是客户端定时发送简单的信息给服务器端告诉它我还在而已。代码就是每隔几分钟发送一个固定信息给服务端，服务端收到后回复一个固定信息如果服务端几分钟内没有收到客户端信息则视客户端断开。比如有些通信软件长时间不使用，要想知道它的状态是在线还是离线就需要心跳包，定时发包收包。发包方：可以是客户也可以是服务端，看哪边实现方便合理。一般是客户端。服务器也可以定时轮询发心跳下去。
心跳包之所以叫心跳包是因为：它像心跳一样每隔固定时间发一次，以此来告诉服务器，这个客户端还活着。事实上这是为了保持长连接，至于这个包的内容，是没有什么特别规定的，不过一般都是很小的包，或者只包含包头的一个空包。
在TCP的机制里面，本身是存在有心跳包的机制的，也就是TCP的选项：SO_KEEPALIVE。系统默认是设置的2小时的心跳频率。但是它检查不到机器断电、网线拔出、防火墙这些断线。而且逻辑层处理断线可能也不是那么好处理。一般，如果只是用于保活还是可以的。
心跳包一般来说都是在逻辑层发送空的echo包来实现的。下一个定时器，在一定时间间隔下发送一个空包给客户端，然后客户端反馈一个同样的空包回来，服务器如果在一定时间内收不到客户端发送过来的反馈包，那就只有认定说掉线了。
其实，要判定掉线，只需要send或者recv一下，如果结果为零，则为掉线。但是，在长连接下，有可能很长一段时间都没有数据往来。理论上说，这个连接是一直保持连接的，但是实际情况中，如果中间节点出现什么故障是难以知道的。更要命的是，有的节点（防火墙）会自动把一定时间之内没有数据交互的连接给断掉。在这个时候，就需要我们的心跳包了，用于维持长连接，保活。
在获知了断线之后，服务器逻辑可能需要做一些事情，比如断线后的数据清理呀，重新连接呀……当然，这个自然是要由逻辑层根据需求去做了。
总的来说，心跳包主要也就是用于长连接的保活和断线处理。一般的应用下，判定时间在30-40秒比较不错。如果实在要求高，那就在6-9秒。
那么synapse的方法中OnHeartbeat事件和HeartbeatRate属性和上文提到的心跳有关系吗？看了帮助文件才知道，根本不是我们上面说的“心跳”（全文参见：http://www.ararat.cz/synapse/doku.php/public:howto:heartbeat）：
What is it useful for?
You can use heartbeat to handle your GUI, for example. In a simple application, making communication calls from the main thread may freeze GUI. You can avoid that by processing GUI events in your heartbeat code.
Also, each heartbeat tests for StopFlag, which allows your application to instantly respond to user’s Cancel action.
可见，synapse的心跳目的并不是用户服务端和客户端之间的保活，而是用于防止冻结窗体（freeze GUI）。至于这点，stackoverflow上有一个提问把实现方式也说的很清楚（全文参见：http://stackoverflow.com/questions/1815442/does-anyone-have-a-good-example-of-how-to-use-synapses-heartbeat-function）：
Although I would suggest running your download in a seperate thread, reading the documentation you’d have to hook a event handler to the OnHeartBeat event.
In that event handler, you could call Application.ProcessMessages() but that is just dangerous due to the possibility of events being fired before you’d actually want them. I would use a custom method to invoke the Paint routine only. You could just pass the handle of your form as parameter, or cast any control to a TWinControl and use the handle property. This will just repaint the form/control, but not allow mouse/keyboard interaction.
procedure AllowRepaints(h: HWND);
var m: tMsg;
begin
while PeekMessage(m, h, WM_PAINT, WM_PAINT, PM_REMOVE) do
DispatchMessage(m);
end;
至于synapse的连接心跳的实现，可以在自己的应用层用定时发送心跳标识的方式来实现，例如：
|
1
2
3
4
5
6
|
procedure KeepTimer(Sender: TObject); beginif FSocket.Socket=INVALID_SOCKET then exit;if not Flock then //Flock是自定义的标识，判断有收发时候不要发心跳包 FSocket.SendBuffer(...);//发送自定义的心跳包end; |
转载请注明：梧桐树下 » synapse socket总结三：心跳（Heartbeat）
http://www.pfeng.org/archives/517