get home/my documents directory on Linux/Windows?

[Zomis]

How to get the home-directory / My Documents directory in Linux/Windows?

[Zomis]

I use GetEnvironmentVariable('HOME') for Linux,
And for Windows I've discovered CSIDL_PERSONAL and GetSpecialDir() in Sysutils, but even though SysUtils is in my Uses clause, It says "Identifer not found: CSIDL_PERSONAL"...?

[pch]

For Linux I use homedir:=expandfilename('~/');

For Windows:

Code: [Select]


var
    PIDL : PItemIDList;
    Folder : array[0..MAX_PATH] of Char;
    const CSIDL_PERSONAL = $0005;
begin
SHGetSpecialFolderLocation(0, CSIDL_PERSONAL, PIDL);
SHGetPathFromIDList(PIDL, Folder);
homedir:=Folder;


[Zomis]

Thanks... Your code made me also notice that I used {$ifdef WIN} instead of {$ifdef WIN32} for the condition for my uses Windows;

[Vincent Snijders]

Take also a look at GetAppConfigDir and related functions.