DelphiBasics
Hi
Function
Returns the hi-order byte of a (2 byte) Integer System unit
 function Hi ( IntValue : Integer ) : Byte;
Description
The Hi function returns the high order byte of a 2 byte integer IntValue as a single byte.
Related commands
Lo Returns the low-order byte of a (2 byte) Integer
Shl Shift an integer value left by a number of bits
Shr Shift an integer value right by a number of bits
 Author links

 Buy Website Traffic at
 Buywebsitetrafficexperts.com

 Buy Proxies at
 Buyproxies.io
 
 Download this web site as a Windows program.




 
Example code : Illustrate Ho and Lo functions
// Full Unit code.
// -----------------------------------------------------------
// You must store this code in a unit called Unit1 with a form
// called Form1 that has an OnCreate event called FormCreate.
 
unit Unit1;
 
interface
 
uses
  // The System unit does not need to be defined
  SysUtils,
  Forms, Dialogs;
 
type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  end;
 
var
  
Form1: TForm1;
 
implementation
{$R *.dfm} // Include form definitions
 
procedure TForm1.FormCreate(Sender: TObject);

var
  i : Integer;

begin
  i := $2345;  // $2345 hex : $23 hi byte, $45 lo byte
  ShowMessage(Format('Integer = $%x', [i]));
  ShowMessage(Format('Hi byte = $%x', [Hi(i)]));
  ShowMessage(Format('Lo byte = $%x', [Lo(i)]));
end;
 
end.
Hide full unit code
   Integer = $2345
   Hi byte = $23
   Lo byte = $45
 
Delphi Programming Neil Moffatt 2002 - 2017. All rights reserved.  |  Home Page