当前程序所有可用的环境变量 = 系统环境变量 + 用户环境变量 + 当前程序环境变量. 以前列出过一些, 但不全:

---

"系统环境变量" 与 "用户环境变量" 在: 我的电脑 -> (右键)属性 -> 高级 -> 环境变量; "当前程序所有可用的环境变量" 在: IDE 菜单 -> Tools -> Options -> Environment Variables:

---

譬如获取 Delphi 程序的安装路径:

---

var  str: string;begin  str := GetEnvironmentVariable('BDS');  ShowMessage(str); { c:\program files\embarcadero\rad studio\7.0 }  //或者  str := GetEnvironmentVariable('Delphi');  ShowMessage(str); { c:\program files\embarcadero\rad studio\7.0 }end;