ADSI-Zugriff führt zu Programmabsturz

[hoika]

Hallo,
ersetz mal alle Strings in der ADSI -Unit durch Ansistrings.
Und Char durch Ansichar.
Das Beispiel,war ja für Delphi,7.

[Siggi]

Hallo Heiko,

gute Idee, aber leider nicht erfolgreich.

CHAR durch AnsiChar ersetzten geht nicht. Das ist nur eine Stelle ( domainName : array[0..DNLEN] of char; ) und da kann es nur CHAR sein, ansonsten beschwert sich auch der Compiler bei der Zeile if LookupAccountName(nil, PChar(FCurrentUser), sid, sidSize, domainName, domainNameSize, sidNameUse) then ... beim Domainname.

String durch AnsiString ersetzten geht fast überall, nur nicht bei dom1, uid1: String;
Die kann ich aber auch direkt übergeben, also statt
ADsGetObject(PWideChar('WinNT://' + dom1 + '/' + uid1), IADsUser, usr); so
ADsGetObject(PWideChar('WinNT://MyDomain/myUser'), IADsUser, usr); Fehler bleibt aber bestehen - der Aufruf gibt die Gruppen zurück und sobald man danach versucht, irgendein Objekt anzusprechen (im Besipile das TMemo) kommt die Zugriffsverletzung.

Ich versuche mal, selber direkt über die ActiveDs_TLB zuzugreifen. Die Verwendung der ADSI-Unit sollte ja eigentlich die Artbeit sparen, für die leider etwas komplizierten Zugriffe die Doku zu studieren und das alles "zu Fuß" zu machen. Aber wenn es dann doch zu mehr Probleme führt als dass es Arbeit spart, muss halt doch der eigene Kopf brummen und das Problem lösen .
Ausleden von Usern bekomme ich damit schon hin, muss noch etwas Doku lesen, dann finde ich auch noch raus, wie man zum aktuellen User die Gruppen auslesen kann...

Gruß
Siggi

[Siggi]

Ich glaube ich kann das Thema schließen,
Ich habe diesen alten Thread von 2010 gefunden: https://www.delphipraxis.net/146499-...och-nie-5.html
Dort wird unter anderem darauf hingewiesen, dass die (auch von mir verwendeten) Übersetzungen der C#-Bibliotheken nach Delphi (adshlp.pas von agnisoft, von Delphi importierte ActiveDS_TLB) teils feherhaft sind. Es wird empfohlen, die JEDI-Bibliotheken JwaAdsTLB und JwaAdsHlp zu verwenden.

... und siehe da: damit geht es zumindest in den ersten Tests ohne die unerklärlichen Zugriffsverletzungen .

Gruß
Siggi