Código Delphi
[-]
List := tcpServer.Threads.LockList;
try
for Count := 0 to List.Count -1 do
try
TIdPeerThread(List.Items[Count]).Connection.WriteLn(Msg);
except
TIdPeerThread(List.Items[Count]).Stop;
end;
finally
tcpServer.Threads.UnlockList;
end;
Es verdad, había revisado el ejemplo, pero no encontraba la sección para distribuirlo. Una duda más... ¿para que sirve el Trim?, porque con la ayuda de Delphi no me aclaro (No se si debería poner esto en un nuevo hilo..., pero como es una pregunta sencilla...).
Muchas gracias