Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.13;
Скачать: CL | DM;

Вниз

Проблема с Socket.OnRead   Найти похожие ветки 

 
Apolius   (2004-12-01 16:49) [0]

Уважаемые мастера, скажите подалуйста как принимать пакеты различной длины:

var Len : integer;
   Buf : array of byte;
begin
Buf := nil;
Len := Socket.ReceiveLength;
SetLength(Buf,Len);
Socket.ReceiveBuf(buf,Len);


если я использую buf:array of byte, то компилятор ругаеться в строке Socket.ReceiveBuf(buf,Len);
если я обьявляю buf : array[0..n] of byte, то тогда теряеться смысл приема пакетов различной длины и появляеться куча проблем. n приходиться подбирать!

Вопрос таков:
Во что записать принятый пакет и как его потом переконвертировать в Buf:array of byte?


 
savva ©   (2004-12-01 19:15) [1]

ну ты хоть бы сказал как ругается..

я б н-р так сделал (в приближении к твоему коду):

var Len : integer;
  Buf : PChar;
begin
Buf := nil;
Len := Socket.ReceiveLength;
GetMem(Buf,Len);
try
 Socket.ReceiveBuf(buf,Len);
 // тут делаешь что хочешь с данными
finally
 FreeMem(buf);
end;


 
savva ©   (2004-12-01 19:20) [2]

но опять же такой подход довольно опасен - так как может произойти "склеивание" пакетов. и тогда логика твоих данных может быть наружена.. ты б сперва посылал длину данных, а потом читал бы столько, сколько надо (© Beeline).


 
savva ©   (2004-12-01 19:22) [3]

поправка:

Socket.ReceiveBuf(buf,Len);

надо читать как

Socket.ReceiveBuf(buf^,Len);



Страницы: 1 вся ветка

Текущий архив: 2005.02.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
3-1105535446
Виталий Панасенко
2005-01-12 16:10
2005.02.13
Определение параметров драйверов в БДЕ


1-1107172538
Alien_D
2005-01-31 14:55
2005.02.13
Авто прокрутка в TreeView


1-1107106394
Pointer
2005-01-30 20:33
2005.02.13
преобразования...


4-1103568134
WandR
2004-12-20 21:42
2005.02.13
Загрузчик ехе


14-1106307091
Cosinus
2005-01-21 14:31
2005.02.13
Господа, у кого есть Service Pack for Delphi6 #2?