主页
Top.Mail.Ru Yandeks.Metrika
论坛:“主要”;
当前存档:2002.07.29;
下载:[xml.tar.bz2];

向下

问题 找到类似的分支


xelax   (2002-07-17 14:56) [0]

基于套接字的本地网络上的聊天程序。
客户端通过自动运行加载。 如何服务器跟踪客户端
(有效或无效)在紧急终止重置或电源客户端程序的情况下



Skier   (2002-07-17 15:22) [1]

> xelax
经过一段时间后需要(TTimer)
向每个客户发送一条消息,例如“你在这儿,儿子吗?”,
每次他都回答,“我在这里爸爸。”
如果客户端没有响应这样的服务器消息,那么就用它
没有连接(?)。

否则,显然没什么......



Eugene Lachinov   (2002-07-17 15:27) [2]

也许有帮助

类型
TTcpKeepAlive =记录
onoff:DWord;
keepalivetime:DWord;
keepaliveinterval:DWord;
结束;

常量
SIO_KEEPALIVE_VALS = $ 80000000或$ 18000000或$ 00000004;

程序TPowersock.SetKeepAlive(dwTime,dwInterval:DWord);
VAR
TcpKeepAlive:TTcpKeepAlive;
dwReturned:DWord;
开始
TcpKeepAlive.onoff:= 1;
TcpKeepAlive.keepalivetime:= dwTime;
TcpKeepAlive.keepaliveinterval:= dwInterval;
WSAIoctl(ThisSocket,SIO_KEEPALIVE_VALS,@ TcpKeepAlive,
sizeof(TcpKeepAlive),nil,0,dwReturned,nil,nil);
结束;



c0pYc@t   (2002-07-17 15:32) [3]

尝试执行发送消息的操作。
s:=“你还活着”;
for i:= 0 to ServerSocket1.Socket.ActiveConnections-1 do
ServerSocket1.Socket.Connections [i] .SendText(s);
客户收到s =“你还活着”;
s:=“是的,仍然活着”;
Socket.SendText(s);



Builder   (2002-07-17 21:41) [4]

相反可能 - 正如ICQ所做的那样
客户端向服务器发送消息 - 我还活着!
服务器抓住它并注意到 - 哦,古怪的活着。

恕我直言不是服务器追逐客户的问题



TTCustomDelphiMaster   (2002-07-17 22:17) [5]


> Builder©(17.07.02 21:41)

如果紧急终止重置或电源客户端程序,服务器甚至不会注意到客户端已经死亡。 他只会在他试图联系“死”的客户时才会注意到,然后他会出现错误,并且与“死”客户相关的连接将需要关闭自己。



Builder   (2002-07-18 10:02) [6]

2 TTCustomDelphiMaster

是的,那又怎样?
在ICQ中,从未注意到您正在向在线人员发送消息,但是一旦您发送给他,他就会离线?
这一切都取决于调查的时间



Страницы: 1 整个分支

论坛:“主要”;
当前存档:2002.07.29;
下载:[xml.tar.bz2];

楼上





内存:0.56 MB
时间:0.021 c
4-95611
Burmistroff
2002-05-22 13:54
2002.07.29
如何使用SYSTEM权限关闭应用程序?


1-95376
YXZ
2002-07-15 21:09
2002.07.29
Dll和字符串


4-95610
KSergey
2002-05-22 15:37
2002.07.29
从dll调用另一个dll中的f-tion


1-95372
jen_bond
2002-07-15 11:19
2002.07.29
有可能??


6-95472
守护进程
2002-05-20 11:57
2002.07.29
如何控制从电子邮件客户端发送信件





南非荷兰语 阿尔巴尼亚人 阿拉伯语 亚美尼亚 阿塞拜疆 巴斯克 白俄罗斯 保加利亚语 加泰罗尼亚 简体中文 中国(繁体) 克罗地亚 捷克 丹麦语 荷兰人 英语 爱沙尼亚语 菲律宾人 芬兰 法语
加利亚西语 格鲁吉亚语 德语 希腊语 海地克里奥尔语 希伯来语 印地语 匈牙利 北日耳曼语 印度尼西亚人 爱尔兰语 意大利语 日本 韩语 拉脱维亚 立陶宛 马其顿 马来语 马耳他语 挪威语
波斯语 波兰语 葡萄牙语 罗马尼亚 俄语 塞尔维亚 斯洛伐克 斯洛文尼亚 西班牙语 斯瓦希里 瑞典语 泰国人 土耳其 乌克兰 乌尔都语 越南人 威尔士语 意第绪语 孟加拉 波斯尼亚
宿务 世界语 古吉拉特语 豪萨语 苗族 伊博 爪哇 卡纳达语 高棉 老挝 拉丁语 毛利 马拉 蒙古人 尼泊尔 旁遮普 索马里 淡米尔文 泰卢固语 约鲁巴语
祖鲁
英文 Французский Немецкий Итальянский Португальский 俄文 Испанский