Mensaje    Asunto: Sockets... Responder citando

void__fastcallTFormInternet::ServerSocket1ClientDisconnect(TObject *Sender, TCustomWinSocket *Socket)
{

FormInternet>ServerSocket1->Active=false;

}

Al salir del evento me da la siguiente exception:

---------------------------
Debugger Exception Notification
---------------------------
Project S_AnilllosProject1.exe raised exception class ESocketError with message 'Windows socket error: Se intentó realizar una operación en un elemento que no es un socket (10038), on API 'closesocket''. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------

bueno... a ver si sabe alguien que pasa...

Gracias, saludos a todos.