[body5]

Здравствуйте. Имеется набор из двух клиентов и инди-сервера. Первый клиент отправляет пакеты на сервер, тот обрабатывает данные и отдает второму клиенту. Подскажите пожалуйста, как правильно посылать данные в клиент, чтобы вызывался обработчик OnReceive. Пробовал разные команды, ничего не получается. С приемом пакетов на сервер проблем нет.
Вот кусок кода (событие OnExecute для сервера):

begin
case AContext.Connection.Socket.Binding.Port of
12340:
begin
// Принимаем от клиента строку
str := AContext.Connection.Socket.ReadString(12);
i := 1;
while (i <= length(str)) do
begin
a := ord(str[i]);
Memo1.Lines.Add(inttostr(a));
inc(i);
end;
end;
12341:
begin
AContext.Connection.Socket.WriteLn(str);
end;

При таком подходе выдается ошибка 'Socket Error #10054 Connection reset by peer.' Смотрел кое-какую литературу, но мало что понял по своей проблеме, если честно. В другом месте ничего не объяснили и сказали, что несу бред, может здесь помогут.