Alle User auslesen

[Martin K]

Hi,
wie kann man denn alle User auslesen?
(Also alle User, die unter Systemsteuerung -> Benutzerkonten zu finden sind)

Hab es schon versucht, einfach alle Ordner in C:\Dokumente und Einstellungen zu nehmen, aber das sind irgendwie viel mehr...

Danke schonmal, für eure Hilfe!

[arbu man]

Auf Luckies Homepage gibt es da eine Unit die das glaub ich kann.

[CalganX]

Hi,
guckst du hier.

Chris

[Martin K]

Danke!

Die Suche hatte ich zwar benutzt, aber irgendwie nichts gefunden

[Martin K]

Hi,
Leider ist es doch nicht so einfach, wie ich dachte...

zwei Fragen zu diesem Code:
Geht das auch ohne die JEDIs ?

Ist es irgendwie möglich, hinter bzw. vor den Usernamen Environment-Variablen zu setzen ?
Bsp:
C:\Dokumente und Einstellungen\<Username>\Startmenü

[DGL-luke]

also äh... du solltest ja irgendwo den benutzernamen als string herbekommen. Mit diesem string kannst du machen, was du willst, also auch

Zitat:

hinter bzw. vor den Usernamen Environment-Variablen [...] setzen

Wenn du nur das Home-Verzeichnis des aktuellen users suchst, wird dir Luckie mit seinem artikel [dp]%Homedir% das unbekannte verzeichnis[/dp] gerne weiterhelfen...

[Luckie]

Zitat von Martin K:

zwei Fragen zu diesem Code:
Geht das auch ohne die JEDIs ?

Jupp. Guckst du hier: http://www.michael-puff.de/dirindex....phi/Sonstiges/ -> MpNTUser.pas

[Martin K]

Zitat von DGL-luke:

also äh... du solltest ja irgendwo den benutzernamen als string herbekommen. Mit diesem string kannst du machen, was du willst, also auch

Zitat:

hinter bzw. vor den Usernamen Environment-Variablen [...] setzen

Wenn du nur das Home-Verzeichnis des aktuellen users suchst, wird dir Luckie mit seinem artikel [dp]%Homedir% das unbekannte verzeichnis[/dp] gerne weiterhelfen...

Hmm... Und wenn ich nicht das Verzeichnis des aktuellen Users will, sondern das von UserX ?
Bsp.:
C:\Dokumente und Einstellungen\UserX\Startmenü

Wie kann man das mit Environment-Variablen lösen ?


@Luckie:
Die Unit sieht ja sehr umfangreich aus, welche Funktion muss ich denn da nehmen?
Kannst Du mir evtl. ein Beispiel geben?

[Martin K]

push^^

[Luckie]

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?