Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Manfred © (2003-07-28 06:47:00)

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

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

Polevi (2003-07-28 13:39:00) [1]

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

Fredericco (2003-07-28 10:39:00) [2]

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

Digitman (2003-07-28 09:10:00) [3]

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

Manfred (2003-07-28 08:46:00) [4]

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

Digitman (2003-07-28 08:09:00) [5]

> Socket.Read(BuffLen);

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

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

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »