Datenmegen ausrechnen?!?

[3_of_8]

Ord(Flags) oder einfach Cardinal(Flags) oder, falls es immer 32 Bit sein soll: LongInt(Flags)

Aber natürlich kann man es auch per Hand umrechnen:

Delphi-Quellcode:

var I: TApFlgs;
    Flags: TAppFlags;
    IntFlags: Cardinal;
begin
  IntFlags:=0;
  for I:=Low(TAppFlags) to high(TAppFlags) do
    if I in Flags then
      IntFlags:=IntFlags or (1 shl ord(I));
end;