Größe von SETs festlegen

[himitsu]

Mit {$MINENUMSIZE x} / {$Zx} kann man ja dir Größe von "enumerated types" festlegen,

Gibt es da auch eine Möglichkeit dieses für SETs zu machen?


in C sind diese ja Integer-groß, aber in Delphi standardmäßig so klein wie möglich

Code:

enum tagLOCKTYPE
  {  LOCK_WRITE     = 1,
     LOCK_EXCLUSIVE = 2,
     LOCK_ONLYONCE  = 4
  }  LOCKTYPE;

so geht es zwar, aber dann sind ide Konstanten vom Typ getrennt

Delphi-Quellcode:

const
  LOCK_WRITE     = 1;
  LOCK_EXCLUSIVE = 2;
  LOCK_ONLYONCE  = 4;

type
  LOCKTYPE = Type Integer;

und dises geht auch, aber es sieht irgendwie blöd aus

Delphi-Quellcode:

type
  LOCKTYPE = Set (
    LOCK_WRITE      = 1;
    LOCK_EXCLUSIVE  = 2;
    LOCK_ONLYONCE   = 4;
    _locktype_align = 31);