delphi 获取系统MyDocuments文件夹路径

本文整理自网络，侵删。

 
单元文件：FileCtrl, ShlObj
 
showmessage(MyDocuments_);
 
function MyDocuments_: string;
const
  SHGFP_TYPE_CURRENT = 0;
var
  path: array [0 .. MaxChar] of char;
begin
  SHGetFolderPath(0, CSIDL_MYDOCUMENTS, 0, SHGFP_TYPE_CURRENT, @path[0]);
  Result := StrPas(path);
end;
 

相关阅读 >>

Delphi 动态注册卸载ocx

Delphi 申请管理员权限级别

Delphi xe5 android手机端转换ansi字符串

Delphi 用内存流文件流资源生成客户端

Delphi 10.3 开发app 在android手机上获取imei

Delphi is 与 as 运算符举例

Delphi查找程序坐标 获取鼠标 模拟鼠标

Delphi 如何编写使stringgrid中的一列具有check功能，和checkbox效果一样

Delphi实现win10下Delphi 10.3.1 inline hook 修改mac网卡地址之getadaptersaddresses

Delphi char string

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 获取系统MyDocuments文件夹路径