void __fastcall TFPortComIP::sktServerClientRead(TObject *Sender,
TCustomWinSocket *Socket)
{
int Client;
int Total = sktServer->Socket ->ActiveConnections; Miro a veure qui es que m'envia dades ///NOCAL!!
for (Client = 0; Client < Total; Client++)
if (sktServer->Socket->Connections[Client] == Socket)
break;
//Client es el numero de cliente, este numero lo puedes usar para enviar informacion al cliente que te ha enviado texto
}