Форум: "Сети";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];
ВнизБуфер приёма пуст. Найти похожие ветки
← →
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]странно другое - как ты это вообще мог "запустить")
← →
Fredericco (2003-07-28 10:39) [4]Мне тоже интересно, а почему бы буферу не быть пустым?
← →
Polevi (2003-07-28 13:39) [5]там байтики внутри
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c