Delphi里怎么获得桌面路径?

3 | 匿名 |浏览352次
检举|收藏|2016/04/02 14:04

操作系统不一样,好像桌面的文件夹的路径不一样啊,怎么样获得当前用户的桌面路径?

全部回答(1)
  • 试试下面的方法:

    uses Winapi.ShlObj;
    
    function GetDeskTopPath: string;
    var
      APathStr: string;
    begin
      SetLength(APathStr, 100);
      SHGetSpecialFolderPath(0, PWideChar(APathStr), CSIDL_DESKTOPDIRECTORY, False);
      result := Copy(APathStr, 0, Pos(#0, APathStr) - 1);
    end;


    回答于 2016/04/19 23:00
0人关注该问题



 加载中...