Карта сайтаСсылкиКонтакты

Как программно определить папку Мои Документы текущего пользователя

PDF Печать
Статьи

В папке Мои Документы в Windows пользователи хранят созданные им текстовые документы, презентации, фотографии и т.д. Если Ваше приложение будет создавать файлы, которые необходимо хранить в папке Мои Документы, то Вы можете программно определить путь к ней для текущего пользователя.

Функция GetPathMyDocs возвращает полный путь к этой папке для текущего пользователя Windows:


uses
  { ... }, ShoObj;

function GetPathMyDocs: string;
var
  bResult: boolean;
  path: array [0..MAX_PATH] of Char;
begin
  bResult:= SHGetSpecialFolderPath(0, path, CSIDL_PERSONAL, false);
  if not bResult then
    raise Exception.Create('Не могу найти папку Мои Документы');
  Result:= path;
end;

Проверим работу этой функции:

Находим полный путь к папке Мои Документы текущего пользователя Windows

procedure TForm1.Button1Click(Sender: TObject);
var
  myDocsPath: string;
begin
  myDocsPath:= GetPathMyDocs;
  lblPathMyDocs.Caption:= myDocsPath;
end;

 

Добавить комментарий


Защитный код
Обновить