Delphi XE - GetHomePath - 获取用户程序数据目录

2021-03-07 16:29

阅读:312

标签:procedure   min   完成   variable   app   folder   appdata   dmi   for   

uses System.IOUtils;

procedure TForm1.btn3Click(Sender: TObject);
var
  S: string;
begin
  { 三种方法结果一致: C:\Users\Administrator\AppData\Roaming }
  S := GetHomePath;     // SysUtils, 能跨平台且简单, 在 Windows 下使用 SHGetFolderPath 完成
  mmo1.Lines.Add(S);
  S := TPath.GetHomePath;                 // System.IOUtils
  S := GetEnvironmentVariable(APPDATA); // 以前一直用这个
end;

 

Delphi XE - GetHomePath - 获取用户程序数据目录

标签:procedure   min   完成   variable   app   folder   appdata   dmi   for   

原文地址:https://www.cnblogs.com/redhat588/p/12821279.html


评论


亲,登录后才可以留言!