Active Directory mit LDAP auslesen

[MathiasSimmack]

*grins* Wofür gibt´s denn den Reflector? Ich habe gerade mal meine CSharp-Exe geladen und mir den Code als Delphi anzeigen lassen:

Delphi-Quellcode:

if (entry1.SchemaClassName = 'User') then
begin
  obj1 := entry1.Invoke('Groups', New(array[0] of TObject));

  for obj2 in (obj1 as IEnumerable) do
  begin
    entry2 := DirectoryEntry.Create(obj2);
    MessageBox.Show(string.Format('Benutzer {0} ist Mitglied der Gruppe {1}',
                    entry1.Name,
                    entry2.Name))
  end
end

Hilft dir das?


Edit: Beachte auch die Schreibweise von "User" und "Groups". Vllt. spielt´s ja auch keine Rolle, aber im Zweifel würde ich den ersten Buchstaben groß schreiben.