Тема: UDP парсинг
Показать сообщение отдельно
  #2  
Старый 23.12.2009, 18:54
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,097
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

А ты как его получаешь?
Вообще - пишется струтура, делается на нее указатель, потом этот указатель "накладывается" на область памяти с данными.

Код:
type
  TUDPPacket = record
    FLAG : Byte;
    PROTOCOL : Byte;
    ADDRESS : Word;
    LENGTH : Word;
    CRC16 : Word;
    CDATA : Array [] Of Byte;
  end;
  PUDPPacket = ^TUDPPacket;

...
var
  Packet : Pointer;
  UDPPacket : PUDPPacket;
begin
  Packet := GetPacket(); // типа получили данные

  UDPPacket := PUDPPacket(Packet);
  ShowMessage('Protocol : ' + IntToStr(UDPPacket^.PROTOCOL));
end;

PS. не уверен с полем CDATA. Надо смотреть подробнее.
Ответить с цитированием