[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] Reference for unit 'System' (#rtl)

hi

Return high byte/word/nibble of value.

Declaration

Source position: systemh.inc line 767

function hi(

  b: Byte

):Byte;

function hi(

  i: Integer

):Byte;

function hi(

  w: Word

):Byte;

function hi(

  l: LongInt

):Word;

function hi(

  l: DWord

):Word;

function hi(

  i: Int64

):DWord;

function hi(

  q: QWord

):DWord;

Description

Hi returns the high nibble, byte or word from X, depending on the size of X. If the size of X is 4, then the high word is returned. If the size is 2 then the high byte is returned. If the size is 1, the high nibble is returned.

Errors

None

See also

Lo

  

Return low nibble/byte/word of value.

Example

Program Example31;

{ Program to demonstrate the Hi function. }

var
  L : Longint;
  W : Word;
  B : Byte;
  
begin
  L:=1 Shl 16;     { = $10000 }
  W:=1 Shl 8;      { = $100 }
  B:=1 Shl 4;      { = $10  }
  Writeln (Hi(L)); { Prints 1 }
  Writeln (Hi(W)); { Prints 1 }
  Writeln (Hi(B)); { Prints 1 }
end.

Documentation generated on: Nov 14 2015