Infos über Client

[hans ditter]

Wenn ich das richitg sehe, dann in etwa so:

Delphi-Quellcode:

for i:= o to TServerWinSocket(Sender) do
begin
  if TServerWinSocket(Sender).Connections[i].SocketHandle = Socket then
  begin
    //hier kommt hin, was du dann tun willst
  end;
end;

LG; hans ditter