Was meinen Vorschlag angeht:
Delphi-Quellcode:
const
USERRIGHT_CONNECT = 1;
USERRIGHT_DISCONNECT = 2;
USERRIGHT_CLOSE = 4;
USERRIGHT_PRINT = 8;
USERRIGHT_EXPORT_HTML = 16;
USERRIGHT_EXPORT_PDF = 32;
...
// Integerwert auf Recht prüfen:
if UserRights and USERRIGHT_CONNECT > 0 then
...
// Recht setzen:
UserRights := UserRights or USERRIGHT_CONNECT;
// Recht entfernen:
UserRights := UserRights and not USERRIGHT_CONNECT;
So kannst du die Bits einzeln benutzen und nur einen oder bei mehr Rechten mehrere Integerwerte benutzen.