Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2002.10.21;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

Форум: "Сети";
Текущий архив: 2002.10.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.54 MB
Время: 0.032 c
3-68676
Pavel_s
2002-10-01 07:02
2002.10.21
Прошу помощи


1-68715
ultrasuper_asd
2002-10-10 23:44
2002.10.21
Как узнать абсолютный номер символа?


3-68626
MAXL
2002-09-29 20:30
2002.10.21
В SQL EXPLORE создал алиас для базы MSACCES97 , но


1-68854
Демонов Е.В.
2002-10-10 14:25
2002.10.21
Вопрос о синтаксисе.


14-68930
Delph
2002-10-01 12:11
2002.10.21
Надо преобразовать исходники Java в Delphi.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский