Отправка сообщения с сервера клиенту.

[securus]

Здравствуйте!

Пытался передать сообщение с TIdTcpServer на TIdTcpClient. От клиента мне удалось отправить довольно легко, но наоборот не получилось. Как я не мучился с ReadBuffer и с athread.Connection.Socket.Send, всё перепроверял, комбинировал как мог, но передавать сервер нужные мне данные не хотел.
Вот простейший вариант моих комбинаций. Судя по рекоммендациях, найденных мною в Интернете, то хоть это должно было бы работать:

На сервере в обработке события TIdTcpServerConnect
...var s:byte...

s:=2;
athread.Connection.Socket.Send(s,1) ;


На клиенте после коннектинга:
...var s:byte...

s:=0;
myform.myclient.readbuffer(s,1);

Любезно выдаёт s=50. Может я имею неверные сведения об операторах передачи, которые следует здесь использовать? Подскажите, пожалуйста, где можно почитать об этом (в Интернете я практически ничего нормального не нашёл) или подскажите здесь. Заранее спасибо за любой из вариантов.