Net2Com, я же тебе давал пример. Что там не так?
------------ Дoбавленo в 14.06:
Поскольку многих интересует этот вопрос, предложу такой вариант: Send files over TCP 2015-05-19.zip

1) Сервер поместить в пустой каталог, запустить.
2) Запустить клиент, добавить в список файлы для отправки, нажать Send All.
Полученные сервером файлы сохраняются рядом с ним с оригинальными именами.
Множественные соединения для сервера не предусмотрены.

Файлы до 4 Гб летят на ура.

Используются:
- Альтернативные TCP компоненты (стандартные глючат)
- Компонент DataAccumulator (накопление фрагментарных данных с удобным определением разделителей или данных указанной длины). У кого уже был - обновитесь: исправлены ошибки.
- Модифицированный DataToFile (для считывания с файла строки указанной длины без дополнительных разделителей)