Active Directory: Berechtigungen; Untergruppen; LDAP?

[CTest]

Hallo
Vielen Dank für das Beispiel.

Es tritt aber der Fehler "Zuordnungen von Kontennamen und Sicherheitskennungen wurden nicht durchgeführt" auf, bei der Zeile:
cxTextEdit1.Text := 'LDAP://' + ADSystemInfo.UserName;
Ich habe schon versucht in den Umgebungsoptionen USERDOMAIN und LOGONSERVER den Domänennamen bzw. IP einzutragen, der Fehler bleibt aber gleich.
Ich kann aber auch nicht hin den distinguishedName so einzutragen, weil ich nicht raus kriege, was ich da als DC,OU,CN angeben muss. Ich habe von dem exchange-server nur den Namen des Domänencontrollers, die IP-Adresse und meine Zugangsdaten gegeben. Schreibzugriff habe ich keinen.

Wenn ich versuche Benutzer und Gruppen mit LDAP auszulesen:
var test : IADS;
ADsOpenObject('LDAP://+'IP-Adresse', 'MEINUSERNAME', 'MEINPASSWORD', 1, IADs, test);
test.Get('distinguishedName') liefert: 'DC=Domänenname,DC=test'
test.Get('class_') liefert: 'domaindns'
als Container enthält er aber keine Objekte.
Mit 'WinNT://' klappt das, kann aber test.Get('distinguishedName') nicht auslesen.

Bekommt man das mit dem ADSystemInfo irgendwie hin, oder wie muss ich den LDAP://-Pfad richtig angeben?