Delphi 版 HTML5 WebSocket Server demo

称：HTML5WebSocketServerDelphi版 编写：tjCFeng 时间：2011-07-01 说明：创建SocketServer监听端口，当数据到达时首先判断第一个字符是否是#$00， 如果不是#0，则证明是第一次的握手信息，需要为HTML5Client返回验证结果， 即调用下面的ShakeHand函数。如果不是#0，则为连接后的数据信息，请自行解析。 参数：接收到的数据和长度。 返回：HTML5Client的IP地址和端口。 代码中包括： HTML5WebSocket握手协议的说明及解析代码； AnsiToUnicode和UnicodeToA