TFbmUserCache.GetCategoriesByID
Diese Funktion ist eine Methode der Klasse TFbmUserCache und welche in der Unit Caches definiert wurde. Der Funktionstyp ist Prozedur.
Die Funktion verlangt folgende Parameter:
Parameter |
Typ |
Beschreibung |
---|---|---|
ID | Integer | Die ID des Benutzers. |
List | TFbmIntegerList | In dieser Liste werden die Benutzergruppen-IDs gespeichert. |
CombineType | TFbmIntegerListCombineType | Legt fest, wie die Liste der Benutzergruppen-IDs erweitert werden soll. |
Ermittelt alle Benutzergruppen für eine bestimmte Benutzer-ID.
Ermitteln, ob der Benutzer Mitglied einer bestimmten Benutzergruppe ist:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
const
UserRef = 1; // Hier die Benutzer-ID festlegen
CategoryName = 'Kundenservice';
var
List: TFbmIntegerList;
begin
List := TFbmIntegerList.Create;
try
Item.UserCache.GetCategoriesByID(UserRef, List, ctCopy);
if List.Find(Item.CategoryCache.GetIDByName(CategoryName)) then
begin
Item.AddToProtocol('Der Benutzer mit der ID ' + IntToStr(UserRef) + ' ist Mitglied der Benutzergruppe "' + CategoryName + '"');
end;
finally
List.Free;
end;
end;
UserRef = 1; // Hier die Benutzer-ID festlegen
CategoryName = 'Kundenservice';
var
List: TFbmIntegerList;
begin
List := TFbmIntegerList.Create;
try
Item.UserCache.GetCategoriesByID(UserRef, List, ctCopy);
if List.Find(Item.CategoryCache.GetIDByName(CategoryName)) then
begin
Item.AddToProtocol('Der Benutzer mit der ID ' + IntToStr(UserRef) + ' ist Mitglied der Benutzergruppe "' + CategoryName + '"');
end;
finally
List.Free;
end;
end;