一个CS结构的Delphi小游戏源码,带网络对战,游戏规则:一次可以拿一列上任意数量的子,最后一颗是谁拿的,谁就输了。  Tcommblock=record//双方共同使用的数据块(服务器客户端)  iCommand:CommandType;//命令类型  sum3,sum5,sum7:string[1];//消息,每次发送的消息的字节数  CIp,msg:string[100];//发送者昵称,信息内容