if CurrentUserHasPermission('Administrator') then begin Message_dlg('Benutzer ist in der Gruppe') end;