Ayuda con cliente/servidor (sockets)

[vejerf]

Muy buenas a todos,
Estoy intentando familiarizarme un poco con los componentes Indy TIdTCPClient y TIdTCPServer, pero necesito ayuda. Lo que intento es realizar un programita al que puedan conectarse uno o varios clientes. Estos clientes una vez conectados no realizan ninguna petición, sino que el servidor conforme va actualizando unos elementos, envía dicha actualización a los clientes. Esto es así de simple. Busco algo como:

Si Servidor.ContadorClientes > 0 entonces
for I:=0 to Servidor.ContadorClientes do
begin
Servidor.Cliente[i].EnviarDatos;
end;

Y por otra parte el cliente debería estar esperando los datos que le llegan por parte del servidor.
Datos := Cliente.LeerDatosServidor;
ActualizarDatos(Datos);

Espero haberme explicado... muchas gracias!!!