| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как узнать активен ли удаленный сервер? [WinXP]

Страницы:   < 1 2 >

Andrewtitoff ©   (2008-03-04 12:59:00) 

Понятно что его нужно спросить об этом, собственно вопрос в том и состоит как это сделать, т.к. если я просто шлю какой либо текст - то соответственно если удаленный сервер слушает - то он мне нормально отвечает, а вот если в ответ тишина - то прога наглухо виснет...

Посылаю текст таким образом :

procedure TMyChat.SendCommand(s:string);
begin
TcpClient1.Active := True;
 try
   if TcpClient1.Connect then
     begin
     TcpClient1.Sendln(s);
     Edit.Clear;
     end;
 finally
   TcpClient1.Disconnect;
 end;
end;


---

Andrewtitoff   (2008-03-04 13:18:00) [21]

А сколько это время дифолтного таймаута ожидания уже 5 мин висит... =(((
Можно сделать чего нить на подобии Ping-а тока для используемого мною порта?

Ой, ну да типа того =)))
А есть какя нибудь разница или это равнозначные команды?

---

Сергей М.   (2008-03-04 13:07:00) [22]

> TcpClient1.Active := True;


> TcpClient1.Connect


Два раза зупускать коннект - это что, для пущей надежности что ли ?)

---

Сергей М.   (2008-03-04 13:05:00) [23]

> прога наглухо виснет


Не "наглухо", а на время дифолтного таймаута ожидания.

---

Страницы:   < 1 2 >

Наверх