So:
Delphi-Quellcode:
GetMem(lgrmi, dwEntries*sizeof(Pointer));
for i := 0 to dwEntries-1 do
begin
Inc(Integer(gui0), sizeof(Pointer));
PLocalGroupInfo0(lgrmi)^.lgrpi0_name := PWideChar(WideString(sGroupArray[i]));
end;
dwError := NetLocalGroupAddMembers(nil, PWideChar(WideString(sUser)), 0, lgrmi, dwEntries);
Also mit NetLocalGroupAddMembers bekomme ich keine Fehlermeldung, aber er macht es auch nicht.