Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Alle User auslesen (https://www.delphipraxis.net/71480-alle-user-auslesen.html)

Martin K 15. Jun 2006 21:15


Alle User auslesen
 
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 15. Jun 2006 21:17

Re: Alle User auslesen
 
Auf Luckies Homepage gibt es da eine Unit die das glaub ich kann.

CalganX 15. Jun 2006 21:21

Re: Alle User auslesen
 
Hi,
guckst du hier. ;)

Chris

Martin K 15. Jun 2006 21:28

Re: Alle User auslesen
 
Danke!

Die Suche hatte ich zwar benutzt, aber irgendwie nichts gefunden :oops:

Martin K 15. Jun 2006 22:10

Re: Alle User auslesen
 
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 15. Jun 2006 22:17

Re: Alle User auslesen
 
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 15. Jun 2006 23:36

Re: Alle User auslesen
 
Zitat:

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 16. Jun 2006 12:00

Re: Alle User auslesen
 
Zitat:

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 17. Jun 2006 17:50

Re: Alle User auslesen
 
push^^

Luckie 18. Jun 2006 12:40

Re: Alle User auslesen
 
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?


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:17 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz