Indy nutzen

[Chris1986]

On Execute wir ausgelöst, sobald ein Client mit dem Server kommuniziert.

Zum Zugriff: Sieh dir erstmal TList an. Hier ein noch ein kleines Beispiel, wie man an einzelne Clients kommt:

Delphi-Quellcode:

var eineVerbindung: TIdPeerThread;
begin
  try
    with idTCPServer1.Threads.LockList do
    begin
      if Count > 0
        then eineVerbindung := Items[0];
    end;
  finally
    idTCPServer1.Threads.UnlockList;
  end;
end;