Главная страница
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.037 c
1-1107260777
NightStranger
2005-02-01 15:26
2005.02.13
Как создать ЕХЕ


1-1107250958
Anknown
2005-02-01 12:42
2005.02.13
XML для Delphi - сохранить и загрузить...


1-1106947872
Ser_max
2005-01-29 00:31
2005.02.13
Maskedit


3-1104401956
Zloy
2004-12-30 13:19
2005.02.13
Возможность использваоние базы данных без установленного софта


1-1106831301
qwe
2005-01-27 16:08
2005.02.13
инсталяция