Главная страница
    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.44 MB
Время: 0.008 c
4-69078
Daken
2002-09-07 20:53
2002.10.21
Как на WinAPI создать ListView и TabControl


1-68684
zevs_a
2002-10-09 12:15
2002.10.21
Pomogite rebyata


14-68948
Ser_Kham1
2002-09-27 13:04
2002.10.21
Windows и MS-DOS


14-69020
lipskiy
2002-09-26 01:36
2002.10.21
Карманный компьютер: какой выбрать? На чем пишут софт для них?


1-68763
Демонов Е.В.
2002-10-11 15:21
2002.10.21
Вопрос Про Delphi и BreakPoint





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский