Delphi
function Hi(X: Integer): Byte;
X の上位バイトを符号なしの値として返します。
Delphi コードでは，Hi 関数は，Word 型または整数型の式の上位バイトを符号なしの値として返します。
メモ： Hi は整数が 32 ビットでも 16 ビット値として処理します。