I\'m comparing a SmallInt variable with the result of the Ord function. Example:
SmallInt
Ord
var MySmallInt : SmallInt; begin MySmallInt :=
Ord() is an intrinsic function that yields an unsigned type. Hence the warning. In your case, you are passing it a WideChar, and so the matching integral type is Word.
Ord()
WideChar
Word