API-Befehl für Profilpfad?

[Esolit]

Hi,

ich suche jetzt schon eine ganze Weile, kann aber keine API-Funktion finden die den Profilpfad zurückgibt. Mit Profilpfad meine ich z.B. C:\Dokumente und Einstellungen\UserName\. So etwas muss es doch aber geben

Grüße,

Esolit

[Pr0g]

Das kannst du per CSIDL_PROFILE rausfinden, einfach Unit ShlObj einbinden und dann bspw. ne Funktion machen:

Delphi-Quellcode:

function GetProfileDir: String;
begin
  SetLength(Result, MAX_PATH);
  SHGetSpecialFolderPath(Application.Handle, PChar(Result), $0028, False); // $0028 -> CSIDL_PROFILE
  Result := PChar(Result);
end;

Mit anderen Ids gehts, aber CSIDL_PROFILE hat er irgendwie nicht, daher habe ich direkt den Wert $0028 genommen, weitere Infos in der MSDN: Link.

MfG Pr0g

[ringli]

Wenn es nicht unbedingt API sein muss reicht dir das hier vielleicht:GetEnvironmentVariable('userprofile')

[NicoDE]

Zitat von ringli:

Wenn es nicht unbedingt API sein muss

Die Variable ist nicht unbedingt gesetzt. Für den Zweck nimmt man normalerweise CSIDL_APPDATA (für ganz alte Windows Versionen ohne IE4 kann man die ShFolder.dll mitliefern).

[marabu]

Und wenn man es richtig aufwendig machen will, dann mit der Funktion GetUserProfileDirectory() aus der USERENV.DLL - aber mir reicht auch die Umgebungsvariable.

Grüße vom marabu

[Pr0g]

In den meisten Fällen braucht man sowieso das Anwendungsverzeichnis, da man nur dort und nicht direkt im Userverzeichnis seine Daten speichern soll.