Delphi-Quellcode:
if APISuccess then
begin
if Assigned(sid) then
FreeSid(sid)
end
else
begin
exit
end;
Kleine Idee: Wie wäre es, sich den letzten Systemfehler anzeigen zu lassen und ihn auszuwerten, anstatt einfach aus der Prozedur zu springen? Dann wüßtest du auch, warum die Funktion fehl schlägt.
Und warum so kompliziert? Warum nimmst du nicht
NetLocalGroupEnum? Die Funktion findest du auch gekapset in meiner
Unit MpuNTUser.pas auf meiner Homepage.