tserversocket user unterscheiden

[Aenogym]

Zitat von G G:

ah nicht schlecht, willst du die vll mal herzeigen?

also eine schleife dadurch zu machen ist doch nicht so schwer

aber weil ich gute laune hab:

Delphi-Quellcode:

function GetConnectionID(AServerSocket: TServerSocket; AIP: string): integer;
var i: integer;
begin
  for i:=0 to AServerSocket.Connections.count-1 do
  begin
    if AServerSocket.Connections[i].RemoteAddress = AIP then
    begin
      result := i;
      break;
    end;
  end;
end;

(das hab ich aus dem kopf geschrieben. falls da ein fehler drin ist, wirst du den aber sicher selber beheben können )

aenogym