Bueno, conozco el FreeAndNil, pero no lo suelo usar...manias...
Lo q quiero decir con crear, viendo lo comentado y según me acuerdo, (es un programa q hice hace 1 año) es q yo creaba un cliente y un servidor.
TServerSocket
TClientSocket
El procedimiento para cada uno era tener una clase por cada y dentro de ella declarar un servidor o un cliente y q esa clase le controle su comportamiento...
Entonces, a estos les pasaba al crearlos el TComponent del formulario.
Entonces al destruir la clase q contenía el TServerSocket no me dejaba hacer un FreeAndNil del objeto, en cambio, con el TClientSocket si me dejaba...
Creo recordar q me comí un poco la cabeza probando formas diferentes para q no cascase, pero al final opté por q lo libere la aplicación al destruirse, ya q dependía del formulario principal...
Este caso, me mosqueo, xq me parecía q hacia todo bien
Código Delphi
[-]
SSocket:= TServerSocket.Create(AOwner);
SSocket.Port := 9998;
SSocket.Active := false;
SSocket.ServerType:= stNonBlocking;
SSocket.ThreadCacheSize:= 10;
SSocket.OnClientRead := ServerSocketClientRead;
SSocket.OnClientError := ServerSocketClientError;
SSocket.OnClientConnect := ServerSocketClientConnect;
SSocket.OnClientDisconnect:= ServerSocketClientDisconnect;
pero no me dejaba luego liberarlo, al hacerlo me salía un error.
Pos eso, muchas gracias...