Delphi - Objetos ???

buenas muchachos.
tengo una consulta para ver si estoy programando bien o no.

hize una classesilla que hace una conexion en internet, en el campo privado declare una variable fSocket como TClientSocket
el problema es que algunas veces falla la conexion por X motivos y trato de conectarme otra vez, si trato de usar el mismo socket me saldra un bonito error, entonces lo trate de solucionar creando uno nuevo y liberando el viejo y luego asigando el nuevo a viejo otra vez. algo asi

procedure Liberar_CrearSocket;
var
NewSocket: TClientSocket;
begin
// Cerramos y Liberaros memoria
fSocket.Close;
fSocket.Free;

// Creamos un Socket nuevo y asignamos sus eventos
NewSocket := TClientSocket.Create( nil );
NewSocket.OnConnect := SocketConnect;
NewSocket.OnDisconnect := SocketDisconnect;
NewSocket.OnError := SocketError;
NewSocket.OnRead := SocketRead;

// A ver si es que sirve esto, Asignarlo para usarlo en classesilla ???
fSocket := NewSocket;
end;

esta bien ?, o es incorrecto hacer eso, mi ejemplo es con ese TClientSocket, pero creo que sirve la pregunta para cualquier componente.

Gracias

No es necesario declara la variable NewSocket para luego asignarla a fSocket. Todo está bien pero te sobra esa variable. Simplemente cuando crees el nuevo socket asígnalo directamente a fSocket. Ten en cuenta que debes liberar todos los recuros del antiguo antes.

Saludos.