[Hobert]

Может кто поможет переконвертировать код С в Delphi?

while (len--)
crc = (crc >> 8) ^ Crc16Table[(crc & 0xFF) ^ *pcBlock++];

return crc;