Getallusers-Pfade: Notlösung

[shmia]

Zitat von Go2EITS:

@shmia
Magst Du nicht ein wenig konkreter werden?

Zitat:

BOOL GetProfilesDirectory(
LPTSTR lpProfilesDir,
LPDWORD lpcchSize
);

damit komme ich nicht klar. Wie muss ich was, wo und wann einbinden und wie dann aufrufen?

Na das ist eine Windows API Funktion, die man benutzen kann/sollte.
http://windowssdk.msdn.microsoft.com.../ms713356.aspx

Delphi-Quellcode:

function GetProfilesDirectory(lpProfilesDir:PChar; var lpcchSize:DWORD):wordbool;

function GetProfilesDirectory; external 'userenv.dll' name 'GetProfilesDirectoryA';

function LeseBenutzerProfilVerzeichnis:string;
var
   len : DWORD;
begin
   len := 264;
   SetLength(result, len);
   if not GetProfilesDirectory(Pchar(benutzerprofilverz), len) then
      RaiseLastWin32Error;
   SetLength(Result, len);
end;

Das wäre dann der Ersatz für "C:\dokumente und einstellungen", denn das Verzeichnis könnte ja auch "C:\Documents and Settings" oder sonstwie heisen.

PS:
man kann auch NetUserEnum benützen, dann ist es keine Notlösung mehr:
http://www.nldelphi.com/forum/showth...&threadid=6308