|
Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
Re: Alle User auslesen
18. Jun 2006, 13:40
Delphi-Quellcode:
uses
MpuNTUser;
function EnumUserCallback(Username: string; cntUsers: Integer; Data: Pointer): Boolean;
begin
TListBox(Data).Items.Add(Username);
Result := True;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
EnumUsers('', FILTER_NORMAL_ACCOUNT, EnumUserCallback, Listbox1);
end;
Was ist daran jetzt so schwer?
Michael
Ein Teil meines Codes würde euch verunsichern.
|