前面叫地主和抢地主结束了, 本篇基本上就是属于打牌的范畴了.
首先把超时的时间延长起来. 不要再超时了. 一定等着我们操作完再继续
select {
case <-ch:
log.Println("模拟打牌")
case <-time.After(time.Second * 10000): // 临时改成10000秒超时
log.Println("roundStart 超时")
}
其次, 客户端需要放两个按钮, 一个过,,, 一个打掉勾选的牌
// TMainForm 主窗体
type TMainForm struct {
*vcl.TForm
pClient *tcpclient.TTCPClient
nTableIndex uint32 // 桌子编号
Btn1 *vcl.TButton //开始连接
Btn2 *vcl.TButton //快速加入
Edit1 *vcl.TEdit
Label1 *vcl.TLabel
Label2 *vcl.TLabel
Label3 *vcl.TLabel
CheckBoxGroup [20]*vcl.TCheckBox
Btn3 *vcl.TButton //叫地主
Btn4 *vcl.TButton // 不叫
Btn5 *vcl.TButton // 打掉指定的牌
Btn6 *vcl.TButton // 过牌
}