Einzelnen Beitrag anzeigen

Holger

Registriert seit: 4. Aug 2003
Ort: Meerbusch
8 Beiträge
 
Delphi 7 Enterprise
 
#1

IdTCPServer - String an ALLE Clients!

  Alt 29. Sep 2003, 23:33
Hi ich will einen Chat schreiben....

dazu hatte ich bisher Sockets benutzt und mit

Delphi-Quellcode:
For I := 0 to ServerSocket1.Socket.ActiveConnections - 1 do
begin // Anzahl der Teilnehmer
with ServerSocket1.Socket.Connections [I] do // Auswahl des Teilnehmers
if (Connected) then SendText(Clientname+': '+msg); // Text senden
end;
diesem Quelltext allen verbundenen Clients die versendeten Nachrichten zugewiesen.

Wie kann ich sowas mit Indys umsetzten das ich an alle verbundenen Clients den gleichen String sende und nicht nur an einen ... ?
  Mit Zitat antworten Zitat