我的电脑：SaveDialog1.InitialDir := '::{20D04FE0-3AEA-1069-A2D8-08002B30309D}';
// My Computer {20D04FE0-3AEA-1069-A2D8-08002B30309D}
// Network Neighborhood {208D2C60-3AEA-1069-A2D7-08002B30309D}
// Recycled {645FF040-5081-101B-9F08-00AA002F954E}

另外可使用SHGetSpecialFolder获取其它Windows虚拟文件夹，相关函数和常数定义于ShlObj。
如下面程序打开最近访问文件夹：
procedure TForm1.Button1Click(Sender: TObject);
var
PIDL: Pointer;
Path: LPSTR;
const
CSIDL_RECENT = $0008;
begin
Path := StrAlloc(MAX_PATH);
SHGetSpecialFolderLocation(Handle, CSIDL_RECENT, @PIDL);
if SHGetPathFromIDList(PIDL, Path) then // returns false if folder isn't part of file system
begin
OpenDialog1.InitialDir := Path;
OpenDialog1.Execute;
end;
StrDispose(Path);
end;

最新文章

1. Windows下磁盘分配操作
2. tkinter 的两个例子
3. [Tips] JavaScript 使用hash 对象传参
4. Java初学(八)
5. 专家谈国产CPU最新发展态势：需强化标准建设（很全面）
6. android shape的使用详解以及常用效果（渐变色、分割线、边框、半透明阴影效果等）
7. POJ 3280 Cheapest Palindrome 简单DP
8. C/C++中整数与浮点数在内存中的表示方式
9. Https系列之一：https的简单介绍及SSL证书的生成
10. asp.net core 系列之用户认证(authentication)
11. alsa音频播放过程中的基本概念
12. Redis学习笔记（2）-新建虚拟电脑，安装系统CentOSMini
13. MySQL权限授权认证详解
14. 编译UNITY的MONO模块记录
15. jenkins net编译部署 笔记 tips
16. Beta之后的想法
17. slf4j的简单用法以及与log4j的区别
18. flask自动代码自动补全
19. vuex状态管理2
20. iOS开发 2x 3x图

热门文章

1. (转)在ASP.NET MVC3 中利用Jsonp跨域访问
2. 【小梅哥SOPC学习笔记】设置Eclipse在编译(build）前自动保存源代码文件
3. codeforces 914E Palindromes in a Tree（点分治）
4. Python 数据分析—第七章 数据归整：清理、转换、合并、重塑
5. model.find(options)
6. windows7开机后，罗技k380无法自动连接解决办法
7. tcxgrid控件中drag a column header here to group by that column移除方法
8. SoapUI设置Cookie
9. Replication--发布属性immediate_sync
10. 【Apache系列】linux下Apache的常用操作