TIdArpHdr = packed record arp_hrd: word; arp_pro: word; arp_hln: byte; arp_pln: byte; arp_op: word; arp_sha: TIdEtherAddr; arp_spa: TIdInAddr; arp_tha: TIdEtherAddr; arp_tpa: TIdInAddr; end;