How to determine the path to the users Application Data

Valid only on Windows NT/2K/XP.

uses ShFolderPath;
...
function LocalAppDataPath : string;
const
   SHGFP_TYPE_CURRENT = 0;
var
   path: array [0..MAX_PATH] of char;
begin
   SHGetFolderPath(0,CSIDL_LOCAL_APPDATA,0,SHGFP_TYPE_CURRENT,@path[0]) ;
   Result := path;
end;

Delphi tips navigator:
» Hiding the cursor from the screen
« How to draw rotated text

• 1
• 2
• 3
• 4
• 5