Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.23;
Скачать: CL | DM;

Вниз

Как сделать переключение?   Найти похожие ветки 

 
новенький   (2006-04-06 19:44) [0]

Здраствуйте, возникла небольшая проблема, в приложении надо реализовать такую схему: есть два компонента ServerSocket и ClientSocket, при старте приложении нужно сделать чтобы сначала клиент коннектился к серверу и если через время Random(10мс) он не приконнектился, то клиент останавливался и запускался сервер и т.д., как это реализовать?


 
Жуков Олег   (2006-04-06 20:39) [1]

наверное так:
const
 TimeOut = 3000; //3000 msec
var
 SavedTime: Integer

 SavedTime:= GetTickCount();
 ClientSocket.Open();
 while not ClientSocket.Socket.Connected and (GetTickCount() - SavedTime < TimeOut) do
   Application.ProcessMessages();

 if not ClientSocket.Socket.Connected then
   StartServer()


мне кажется 10 мс мало будет...


 
tesseract ©   (2006-04-06 21:40) [2]

по какому протоколу коннектишься? В UDP есть таймаут соединения, после которого выдаётся ошибка подключения.
TCP без организации подключения вообще не сработает. Разница между клиентом и сервером практически чисто в определениях.


 
новенький   (2006-04-07 17:38) [3]

поставил 100мс, и немного доработал код, но за идею огромное спасибо!!!!!!



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

Текущий архив: 2006.04.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
2-1144314324
Cneltyn
2006-04-06 13:05
2006.04.23
Как вывести в Имидж содержимое другого Ммиджа в опр-ые координаты


2-1144259729
Yegorchic
2006-04-05 21:55
2006.04.23
TMainMenu.ShortCut


15-1143758823
Andy BitOff
2006-03-31 02:47
2006.04.23
Интересная статья о птичьем гриппе.


2-1144297950
Alex_C
2006-04-06 08:32
2006.04.23
Как запустить программу и подождать пока откроется основное окно?


15-1143574068
Petr V. Abramov
2006-03-28 23:27
2006.04.23
Вследствие действий электриков...