Delphi » Operacje liczbowe » Obliczenia

Hi

Mabakay

2006-01-12 07:55:18
2010-10-31 18:27:07
2 komentarze
859 odsłon

function Hi(X): Byte;

Funkcja zwraca wysoki bajt parametru X. Gdzie X jest wyrażeniem typu Integer. Możemy to wykorzystać np. do wyciągania dwóch liczb ukrytych w jednej zmiennej typu Integer.

program Foo;
 
{$APPTYPE CONSOLE}
 
var
  W: LongWord;
 
uses
  SysUtils;
 
begin
  W := $11336699;
  Writeln('High-Byte: $', IntToHex(Hi(W), 0)); {Low-Byte: $66}
  Readln;
end.

Funkcja Hi w <font color="red">Delphi</span> zawsze traktuje wyrażenie jako Integer 16 bitowy, niezależnie od tego, czy taki jest, czy 32 bitowy. Natomiast we <font color="red">Free Pascalu</span> funkcja zwróci bajt, gdy zmienna będzie 2 bajtowa i słowo, gdy 4 bajtowa. Funkcja `Hi `nie istnieje w Delphi dla .NET

Zobacz też: