Alogo parecdo al evento onread en idtcpclient de las indy

[leury]

Apenas empiezo con los componetes indy, y me topo con algo que parece ser una excepcion en ellos, en el componente idtcpclient no encuentro evento onread como en clientsocket, pero supongo que habra algun otro metodo que lo sustitulla (ya sea con codigo o con la ayuda de otro componente) de manera funcional y efectiva.

¿En el componente idtcpclient de las indy, que evento me dice que el servidor me ha enviado datos, para asi luego leerlos?
De Atemano:
Gracias por sus colaboraciones.

ATT:

Leury.

"NO AL TABACO: POR QUE PULMONES SOLO TENEMOS DOS"
"SI ALA MARIGUAN: POR QUE NEURONAS TENEMOS MILES"

[DarkByte]

¿Te da el error también al acoplarlo en un nuevo proyecto?, a mi también me da ha dado ese error a veces, y es que había puesto una letra delante del procedure o cualquier tontería así.

[jachguate]

Hola.

Los datos que envia el servidor los lees con los métodos ReadLn, ReadInteger, ReadStream, en fin... Read*

Hasta luego.

[leury]

Bien jachguate, a lo mejor no fui claro con la pregunta, pero mi duda es en que evento del idtcpclient me dice que el servidor me ha enviado datos.
para asi saver en que momento leerlos.

Gracias.

[DarkByte]

Puedes tener un timer leyendo todo el día a ver si recibe datos.

[leury]

Bien Darkbyte, pero ya lo intente y me causa muchos problemas no se por que ocaciona que mi aplicacion se bloque, hasta que es desconectada.

Alguna otra Sugerencia..

Gracias...

Ahora estoy probando con un Idconnectionintercept asociado al Idtcpclient,
En su propiedad onreceive, pero no consigo nada.


Alguna otra Sugerencia..

De Nuevo Gracias...

[leury]

Antes que nada Muchas Gracias por averme ayudado.

Les informo que encontre la solucion a mi problema.

Una solucion practica fue la expuesta por DarkByte, pero como ya lo mencione me ocacionaba problemas cuando el servidor dejaba de enviar datos por un periodo de tiempo.

La solucion fue crear el siguiente Threard Object, que esta dormido mintras no haya datos que leer:

Código Delphi [-]
procedure escucah.Execute;
var
  Com,
  Msg : String;
begin
while true do 
     with Form1 do
       begin
        if not IdTcpClient1.Connected then
         exit;

        Msg := IdTCPClient1.ReadLn(); //Espero hasta que un dato sea enviado por el servidor
        memLines.Lines.Add(Msg);
  
        end;

end;

Gracias por Todo.

[Poke]

Disculpen mi problema en estos momentos es el mismo si me pudieran ayudar, es decir en donde coloco el código de que manifiestas, me ayudarías bastante, tb. Estoy realizando una aplicación similar y me da error es decir el cliente se me cuelga cuando no recibe ningún dato.

[jachguate]

Has visto en que llamada se queda colgado el programa?