Ver Mensaje Individual
  #1  
Antiguo 26-07-2010
anakin1981 anakin1981 is offline
Registrado
 
Registrado: jul 2010
Posts: 2
Reputación: 0
anakin1981 Va por buen camino
Exclamation Problema al detener Indy TCP Server

Hola a tod@s,

Escribo mi primer mensaje para ver si alguien con más sabiduría me puede dar luz sobre este problema. Tengo un programa con un componente IdTCPServer que se inicia y se detiene pulsando botones. A continuación explico la secuencia del error, siempre sin tener ningún cliente conectado en todo momento.

Primero pulso el botón para iniciar el servidor, en el Onclick del botón está:
Código:
IdTCPServer.DefaultPort := Puerto
IdTCPServer.Activate := True
Después detengo el servidor, en el Onclick del botón está:
Código:
IdTCPServer.Activate := False
Luego cambio el valor de Puerto a otro diferente porque quiero volver a activar el servidor y que escuche en un puerto distinto. Por último inicio el servidor pulsando el botón y se inicia correctamente pero NO está escuchando por el nuevo puerto sino por el antiguo. Se me ocurrió añadir la siguiente línea antes de parar el servidor, y ya funcionaba correctamente, pero me da problemas de violación de acceso al detener el servidor cuando se cierra el programa.

Código:
IdTCPServer.Bindings.Clear;
IdTCPServer.Activate := False
Espero vuestra ayudita. Gracias!

P.D.: Tengo Delphi 7 (Build 4.453) e Indy 9.0.4 beta
Responder Con Cita