数据包与record

请教下，为什么定义了一个record就能将发过来的数据包解析成我想要的数据
比如下面的代码，我定义好了，接到数据为什么可以直接拿到DevID
var
  DevID: integer;
  P: PMyData;
begin
  P := PMyData(AData);
  DevID := P^.DevID;
end;TMyData = packed record
  size: Word;
  flag: byte;
  DevID: Integer;
  {
   =============
   =============
   }
end;
PMyData = ^TMyData;