[an error occurred while processing this directive]
|
Маска байта ByteMask определяется как 255, 255*256, 255*256*256,.. (компилятор подставит сюда правильные значения в зависимости от порядка байт)
После этого
Result := Result + ((YourByte * $01010101) and ByteMask)
E-mail: info@telesys.ru