ce serait pas plutot :

function proccrc8(u8CRC, u8Data: Byte): Byte; inline;
begin
Result := u8CRC8Table[IntPower(u8CRC, u8Data)];
end;
?