Как можна узнать номер по порядку Connections клиента с которого пришло сообщение на процедуру ClientRead (не заставляя клиенту подавать сообщение идентификации), если к одному порту ServerSocket подключено несколько клиентов, что бы тип Socket: TCustomWinSocket дал это знать (так как при отправке сообщения ServerSocket-ом есть такая процедура ServerSocket1.Socket.Connections[i].SendText(...)), типа :
PHP код:
procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
VAR
S : STRING;
NPort, Nconect : integer;
begin
S:=Socket.ReceiveText;
NPort:=Socket.LocalPort;
Nconect:=Socket........; <<<<<<<
..........