直接上代碼：
// 通過注冊表 取桌面路徑
function GetShellFolders(strDir: string): string;
const
regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
var
Reg: TRegistry;
strFolders: string;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey(regPath, false) then
begin
strFolders := Reg.ReadString(strDir);
end;
finally
Reg.Free;
end;
result := strFolders;
end;調(diào)用方式很簡單，
vDesktopFilePath := GetShellFolders('Desktop');
直接調(diào)用這個函數(shù)，參數(shù)為Desktop，就可以取到當(dāng)前用戶桌面目錄的路徑。
文章來源：http://www.zghlxwxcb.cn/news/detail-602836.html
可以看到，我們還能取到的其他目錄路徑，只要我們將參數(shù)設(shè)置為紅框里的鍵值就可以取到了。?文章來源地址http://www.zghlxwxcb.cn/news/detail-602836.html
到了這里，關(guān)于delphi 通過注冊表 取桌面目錄路徑的文章就介紹完了。如果您還想了解更多內(nèi)容，請在右上角搜索TOY模板網(wǎng)以前的文章或繼續(xù)瀏覽下面的相關(guān)文章，希望大家以后多多支持TOY模板網(wǎng)！
![[Nacos] Nacos Client獲取所有服務(wù)和定時更新Client端的注冊表 (三)](https://imgs.yssmx.com/Uploads/2024/02/649134-1.png)
