Отправить\принять пакет TCPClient

[Jes]

прикольная у вас тут дискуссия по изучению работы сокетов
я вот на делфи давно не писал но мне кажеться что с сокетами нужно примерно так работать:
function login;
var
login:TIdTCPClient;
buf:TIdBytes;
val:Byte;
begin
login.Port:=2106;
login.Host:="where.are.you";
login.Connect;
if login.Connected than
with login.Socket
begin
ReadBytes(buf,InputBuffer.Size);
val:=15;
Write(val);
....
end;
end;
тока не говорите что в коде много синтаксических ошибок

[Amorality]

Сообщение от ;13808

тока не говорите что в коде много синтаксических ошибок

Грамматические тоже есть

Сообщение от ;13808

ReadBytes(buf,InputBuffer.Size);
val:=15;
Write(val);

Это немного не поняла, куда ты читаешь и что есть val? куда ты его пишешь?

[Jes]

а так ?
login.Socket.ReadBytes(buf,login.Socket.InputBuffe r.Size);