IdTCPServer e IdTCPClient

Question

Estou tipo fazendo um chat e me bati com um problema!O TCPServer fica na maquina 10.1.1.1Os TCPClient fica nas maquinas 10.1.1.2 at� 10.1.1.10Tudo uma blz, s� que por exemplo o cabo da rede foi descon...

Massuda · Answer

Como voc� est� fazendo o teste de conex�o no timer?...

Rud� · Answer

Estou mandando uma stringWriteLn(�teste�);...

Massuda · Answer

Mas � s� isso ou voc� espera alguma resposta?

Um jeito de saber com certeza se a conex�o est� ruim ou o servidor parou � enviar [b:f1455f8f16]e[/b:f1455f8f16] esperar por uma resposta (um dos par�metros de ReadLn permite especificar um timeout na espera).

Rud� · Answer

Descupe n�o entendi, ent�o o que devo fazer para verificar?...

Massuda · Answer

Voc� tem que no TIdTCPClient enviar para o TIdTCPServer (ou o contr�rio, se preferir) alguma coisa (por exemplo, como voc� fez, �TESTE�) e fazer o TIdTCPServer enviar uma resposta ao TIdTCPClient (por exemplo, �OI�). Assim voc� sabe que a conex�o est� boa e que o servidor est� rodando.

Assumindo que o cliente ir� testar o servidor, a rotina do timer pode ser...

procedure TSeuForm.TesteTimer(....
begin
  IdTCPClient1.WriteLn(�PING�);
  S := IdTCPClient1.ReadLn(...);
  // pode testar se recebe e se � a resposta esperada
end;

Massuda · Answer

A prop�sito, algo muito parecido foi discutido [url=//forum.clubedelphi.net/viewtopic.php?t=69507]neste t�pico[/url]....

F�rum IdTCPServer e IdTCPClient #321504