Вниз
Скачать: CL | DM;

NMUDP ???   Найти похожие ветки 

 
BAHO ©   (2002-08-17 23:40) [0]

Здравствуйте мастера...
у меня есть вопрос по реализации пинга по вышеуказанному протоколу...
я делаю примерно следующее...>

Прога сервер:

type
TClient=record
IP:string[15]; //IP клиента
Status:boolean; //подключен ли клиент
Timeout:integer; //время ожидание ответа клиента
end;
var
Client:array of TClient;

в обработчике события NMUDPDataReceived
for i:=0 to количество клиентов-1
do if Client[i].IP=FromIP
then if not Client[i].Status
then
begin
Client[i].Status:=true;
Client[i].TimeOut:=10;
end;

Потом в Таймере просто отнимаю 1 каждую секунду от каждого клиента из TimeOut и если он равен 0 или <0 то Status:=false

Прога клиент просто посылает серваку данные раз в несколько секунд...

Вот такой у меня получился пинг клиентов...

Оцените пожалуйста и укажите на ошибки.
Либо предложите альтернативу...
Спасибо.!


 
BAHO ©   (2002-08-19 00:47) [1]

И не будет ли это глюкавить при большом количестве клиентов...?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c
14-68981
Walker
2002-09-29 02:34
2002.10.21
Мастера, сколько вас и как о вас узнать???


14-68916
multik
2002-10-01 00:10
2002.10.21
диски охота


1-68793
Gregory
2002-10-09 20:40
2002.10.21
Сортировка в TListView


14-68921
Dimich1978
2002-10-01 12:00
2002.10.21
Все на помощь...по мере возможности


1-68847
Sergey_Elf
2002-10-10 12:56
2002.10.21
CreateProcess не работает без полного пути к исп.файлу, а надо бы




   Наверх