使用Delphi实现的WebSocket服务端,完成了握手和数据的收发,没有处理除数据帧外的其他类型帧,可作为实现WebSocket服务器的参考。