Problem mit Enumeration

[Blup]

Dir ist klar das Random(255) nur Zahlen im Bereich 0..254 erzeugt?

Delphi-Quellcode:

function Get_a_Bit(const AValue: Cardinal; const Bit: Byte): Boolean; overload;
function Get_a_Bit(const AValue: Cardinal; const Bit: THanID): Boolean; overload;

implementation

function Get_a_Bit(const AValue: Cardinal; const Bit: Byte): Boolean;
begin
  Result := (AValue and (1 shl Bit)) <> 0;
end;

function Get_a_Bit(const AValue: Cardinal; const Bit: THanID): Boolean;
begin
  Result := Get_a_Bit(AValue, Ord(Bit));
end;