>The following line gives a warning:
>
>
> Public nCRC32 As UInteger = 0
>
>
>"Type of member 'nCRC32' is not CLS-compliant."
>
>I have been trying to find where in the compile options to avoid that but was unable to find a setting. Is there such a setting?
Michel,
I suppose this is related to yesterday
I see your class uses a property to store nCRC32 Integer
You could add an extra method that takes the calculated nCRC and returns a UInteger
something like - There may be syntax errors
pseudo code
if( nCRC32 is not negative)
returnvalue = nCRC32 converted to UInteger
else
set leftmost bit to zero
convert to UInteger
add &H80000000UI
public function GetUnsignedCRC() as UInteger
dim uCRC as UInteger
if( nCRC32 >= 0 ) then
uCRC = CType(nCRC32 , UInteger)
else
uCRC = CType( (nCRC32 And &H7FFFFFFF), UInteger) + &H80000000UI
endif
return uCRC
end function
Gregory