Unit 'System' Package
[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] [#rtl]

Hi

Return high byte/word/nibble of value.

Declaration

Source position: systemh.inc line 945

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 or longword from X, depending on the size of X.

Size Return value
8 Byte, High nibble
16 Byte, High byte
32 Word, High word
64 Cardinal, High DWord

Note that in Delphi or TP, this function always treats its argument as if it was a Word, so the results may differ from FPC.

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: Oct 27 2024