Буфер приёма пуст.

← →
Manfred © (2003-07-28 06:47) [0]

Здравствуйте, уважаемые Мастера.
Вот кусок кода:

procedure AnyProc;
var
BuffLen: Integer;
CellHR: AnsiString;
Buffer: PChar;
begin
Socket:=TClientSocket.Create(Application);
Socket.Address:="10.1.1.1";
Socket.Port:=100;
Socket.OnRead := OnRead;
Socket.OnConnect := OnConnect;
Socket.Active:=True;
while not Socket.Connected do Application.ProcessMessages;
Socket.SendText(#13#10);
BuffLen := Socket.ReceiveLength;
GetMem(Buffer, BuffLen+1);
Socket.Read(BuffLen);
Socket.ReceiveBuf(Buffer[0], BuffLen);
Запускаю, смотрю - а Buffer-то пуст! Почему?
С уважением, Manfred

← →
Digitman © (2003-07-28 08:09) [1]

> Socket.Read(BuffLen);

это что такое ?

и почему, спрашивается, буфер должен быть не пуст ?

← →
Manfred © (2003-07-28 08:46) [2]

Спасибо, Digitman, я к утру что-то плохо соображать стал :-)
Увидел твой вопрос и всё встало на свои места :-)

← →
Digitman © (2003-07-28 09:10) [3]

странно другое - как ты это вообще мог "запустить")

Мне тоже интересно, а почему бы буферу не быть пустым?

там байтики внутри

Буфер приёма пуст. Найти похожие ветки