[Archer]

Hola, supongo que alguien se encargara de "reñirte" por no poner el codigo con las etiquetas correspondientes, yo me limito a darte la solucion:

Primera, deberias de usar los metodos Open() y Close() en lugar de poner "Active" a true o a false.

Segunda, antes de hacer los Open() (recuerda que estos sustituyen a tus Active := true) haz un Close() pero no del ClientSocket si no del Socket que contiene:

Código Delphi [-]
ClientSocket1.Close(); //NOOOOOO

ClientSocket1.Socket.Close(); //SIIIII

Luego el Open() lo puedes hacer como hasta ahora:

Código Delphi [-]
ClientSocket1.Open();

Saludos.