Ergebnis der Suchanfrage

• Forum: Netzwerke

  IdTCPServer - String an ALLE Clients!

    Delphi
    by Holger, 29. Sep 2003
  Hi ich will einen Chat schreiben....
  
  dazu hatte ich bisher Sockets benutzt und mit
  
  
  For I := 0 to ServerSocket1.Socket.ActiveConnections - 1 do
  begin // Anzahl der Teilnehmer
  with ServerSocket1.Socket.Connections do // Auswahl des Teilnehmers
  if (Connected) then SendText(Clientname+': '+msg); // Text senden
  end;