Рисуя отрицательным голосом за саморекламу, я хотел бы поделиться с вами netAPI.pas .
Не имея большого опыта работы с активным каталогом и не имея версии Delphi выше 7, я полагаю, что вы можете получить всех пользователей из определенной группы с помощью следующего кода:
GetNetGroupUsers([ServerName], [GroupName], [StringList not nil], False, True);
Изучите этот StringList для своего имени пользователя.