Actualizar form mientras se reciben datos por sockets

[[seoane]]

Estas haciendo muchas suposiciones, sobre el tiempo que tardan en llegar los paquetes. No se si has probado el programa dentro de una red de verdad, poniendo el servidor y el cliente en equipos diferentes, si lo haces veras que los paquetes puedes sufrir retardos imprevisibles, así que hacer suposiciones sobre los milisegundos te llevara a errores.

Por otro lado supongo que estas usando sockets que no se bloquean, asíncronos. Estos son muy cómodos, pues solo tienes que esperar a que la información vaya llegando y el evento OnRead se dispara todas las veces que eso ocurra. El problema es que tu quieres leer todos los datos de una vez, y precisamente los sockets asíncronos se utilizan para ir leyendo la información según va llegando, en diferentes eventos. Así que lo que deberías hacer es usar, por ejemplo, variables globales.

Dicho esto, yo te recomiendo los socket que se bloquean usados junto con threads. El concepto es mucho mas sencillo, cada conexion es un hilo de ejecucion diferente, y los datos se leen y escriben de forma sincrona. Para mi es mucho mas facil de entender el modelo sincrono que el asincrono, pero a la gente parece que le gusta mas lo asincrono

Ya se que lo anterior es un rollo, así que mi consejo es que si quieres hacer algo mas complejo que mandar mensajitos de texto, te olvides del TClientSocket y TServerSocket y utilices los componentes Indy, y mejor si utilizas un componente con un protocolo como ftp, http. Y si lo sigues queriendo hacer por el camino difícil, entonces dejate de tonterías y vamos directamente a la api, donde crearemos los socket "a mano" y leeremos, escribiremos y comprobaremos su estado usando funciones de la api. Esto que en principio resulta muy trabajoso, luego nos da mucho mas control sobre la comunicación.

Espero que te sirva, y perdona por el rollo ...

[JMGR]

Gracias por la respuesta seoane, te comento:

No se si has probado el programa dentro de una red de verdad, poniendo el servidor y el cliente en equipos diferentes, si lo haces veras que los paquetes puedes sufrir retardos imprevisibles, así que hacer suposiciones sobre los milisegundos te llevara a errores.

Si, he probado la aplicacion tanto en red local como en internet y me ocurria que, en red si me llegaban enteros los archivos, mientras que en internet no, hasta que aumente el tiempo a 500, ahora entiendo el por qué, pero claro, con ese tiempo las transferencias son bastante lentas...

mi consejo es que si quieres hacer algo mas complejo que mandar mensajitos de texto, te olvides del TClientSocket y TServerSocket y utilices los componentes Indy, y mejor si utilizas un componente con un protocolo como ftp, http.

En un principio intente usar los Indy ya que habia leido por aqui que eran los recomendables pero no encontre ninguna demo de TCP/IP, aparte de que la version que tengo yo de las Indy, la 10, ya no trabaja con Threads sino con IdContext, asi que no me aclare y me decidi por los sockets normalitos...se ve que no fue mi mejor idea...

Dado que mi intencion si que es hacer algo mas que mandar mensajitos voy a ponerme a investigar con los Indy a ver que pasa, y de paso ver si encuentro un ejemplo de sockets asincronos y threads y a ver que veo mas asequible.

Ya dare el coñazo por aqui con las dudas que me surjan...
Gracias por el "rollo"
Un saludo.
JMGR

[genyus00]

usa application.processmessage o simula el while con un timer.