Подключение к серверу

[Artem]

Я делаю программу Клиент-Сервер. Когда клиент не может подключиться к серверу, он долго думает прежде чем сообщить о неудачной попытке (если может, то подключение происходит мгновенно)!! Вот, у меня возник вопрос, можно ли как-нибудь задать условие, типа:
Если в течении 1-2 секунд не происходит подключение, то сервер не доступен...???? Как такое возможно реализовать?

[BOBAH13]

берите таймер или

var k: dword;
begin
k := gettickcount;
while gettickcount - k < Ваше время в миллисекундах do
begin
.. обработка ожидания
end;

время закончилось
end;

[Artem]

не совсем понял, как обработать задержку, вот мой код

TCP.connect;
if tcp.connected = true then
ShowMessage ('Good') //если коннект успешный Гуд сразу выскакивает
else
ShowMessage('Bad'); //если нет то идет задержка в секунды 4

[Квэнди]

не пробовали хотя бы в помощи посомтреть tcp.connect ?
если вы используете indy , т.е. IdTcpclient т ов параметрах метода connect можно указать тайм-аут

[BOBAH13]

ну я то написал для WinSock не блокирущих )) я вообще еще и в глаза не видел те Indy, у меня пристрастие до них вообще нет.