我想用indy控件做一个socket服务器端的程序,要每隔10秒发送出一些数据包 ( 积分: 100 )

  • 主题发起人 主题发起人 killerzlk
  • 开始时间 开始时间
K

killerzlk

Unregistered / Unconfirmed
GUEST, unregistred user!
请问,这个时间控制能用时钟控件吗??必须自己写线程??或者IdTCPServer控件自己就能实现线程呢??最好谁有这个例子给看看。
我对这个控件不是很清楚,网上找帮助文档也没找到。
 
请问,这个时间控制能用时钟控件吗??必须自己写线程??或者IdTCPServer控件自己就能实现线程呢??最好谁有这个例子给看看。
我对这个控件不是很清楚,网上找帮助文档也没找到。
 
delphi7里有自带的Demo,可以参考;
增删功能;
 
可以用时钟控件 只是不知道你发数据是发去那 发给连着你的客户端?
如果是的话,每个客户端连接的时候你都将记录客户端的信息包括socket连接 要给所有客户端发送信息其实就是 循环客户端列表然后获取每个客户端的socket连接发送想要发送的数据 设置时间控件的间隔为10秒 没次触发就做以上所诉的事
=================================== 随便贴段列子
Procedure TGameManage.HideAllClient;
Var
I: Integer;
Begin
FShow.Shower.AddShow('隐藏所有客户端');
Try
With PlayerList.LockList Do Begin
For I := 0 To Count - 1 Do Begin // Iterate
Try
Fmain.SendHead(CmdHideAllClient, PRplayer(Items).Athread);
Except
Continue;
End;
End; // for
End; // with
Finally
PlayerList.UnlockList;
End;
End;
 
后退
顶部