Findcomponent TclientSocket.active := true setzen

[Pet04]

Die Verbindungen funktionieren ja wunderbar.

erst wenn ich z.B. von einem bestimmten client das Netzwerkkabe ziehe und bis zum Fehler (OnError) warte.
Und ich die Abrfage ob der Client = Aktiv ist.
wird der richtige client wohl nicht gefunden

If not (TClientsocket(FindComponent(Price_Info_ClientSock etE.Name)).active) then
//if not Price_Info_ClientSocketE.Active then
begin
Memo1.Lines.Add(Price_Info_ClientSocketE.Name +'<connection failed>');
TClientsocket(FindComponent(Price_Info_ClientSocke tE.Name)).Active := true;
//Price_Info_ClientSocketE.Active := true;
Reconnect;