despues de hacerle algunos ajustes para que funcionara en delphi 7 ya que a parte de que indy no pone en el uses las unidades necesarias y ademas algunas cosas como:
delphi
Size := AContext.Connection.IOHandler.ReadLongInt(true);
para que funcionara lo cambie a:
delphi
Size := AContext.Connection.IOHandler.ReadInteger(True);
y algunos mas que ahora no recuerdo, aqui les dejo el programa completo, si quieren hacer pruebas en una sola computadora, deben poner la ip como 127.0.0.1