用 GetEnvironmentVariable 获取常用系统变量
来源:互联网 发布:网络流行数字语言大全 编辑:程序博客网 时间:2024/06/05 14:10
以前曾用 GetWindowsDirectory、GetSystemDirectory、GetTempPath 等函数获取系统常用文件夹;
也用过 SHGetSpecialFolderLocation、SHGetPathFromIDList 函数获取过更多常用路径;
但这都不如用 GetEnvironmentVariable 获取系统变量来得快.
--------------------------------------------------------------------------------
//譬如 %WINDIR% 是表示系统目录的系统变量, 可以这样获取:var s: string;
begin s := GetEnvironmentVariable('WINDIR');
ShowMessage(s);
{C:\WINDOWS}end;
--------------------------------------------------------------------------------
%WINDIR% {系统目录 - C:\WINDOWS}%SYSTEMROOT% {系统目录 - C:\WINDOWS}%SYSTEMDRIVE% {系统根目录 - C:}%HOMEDRIVE% {当前用户根目录 - C:}%USERPROFILE% {当前用户目录 - C:\Documents and Settings\wy}%HOMEPATH% {当前用户路径 - \Documents and Settings\wy}%TMP% {当前用户临时文件夹 - C:\DOCUME~1\wy\LOCALS~1\Temp}%TEMP% {当前用户临时文件夹 - C:\DOCUME~1\wy\LOCALS~1\Temp}%APPDATA% {当前用户数据文件夹 - C:\Documents and Settings\wy\Application Data}%PROGRAMFILES% {程序默认安装目录 - C:\Program Files}%COMMONPROGRAMFILES% {文件通用目录 - C:\Program Files\Common Files}%USERNAME% {当前用户名 - wy}%ALLUSERSPROFILE% {所有用户文件目录 - C:\Documents and Settings\All Users}%OS% {操作系统名 - Windows_NT}%COMPUTERNAME% {计算机名 - IBM-B63851E95C9}%NUMBER_OF_PROCESSORS% {处理器个数 - 1}%PROCESSOR_ARCHITECTURE% {处理器芯片架构 - x86}%PROCESSOR_LEVEL% {处理器型号 - 6}%PROCESSOR_REVISION% {处理器修订号 - 0905}%USERDOMAIN% {包含用户帐号的域 - IBM-B63851E95C9}%COMSPEC% {C:\WINDOWS\system32\cmd.exe}%PATHEXT% {执行文件类型 - .COM;
.EXE;
.BAT;
.CMD;
.VBS;
.VBE;
.JS;
.JSE;
.WSF;
.WSH;
.pyo;
.pyc;
.py;
.pyw}%PATH% {搜索路径}
--------------------------------------------------------------------------------
另外, 可以利用 .. 到上层目录, 如:
--------------------------------------------------------------------------------
var s: string;
begin s := GetCurrentDir;
ShowMessage(s);
{C:\Documents and Settings\wy\My Documents\RAD Studio\Projects} SetCurrentDir('..');
s := GetCurrentDir;
ShowMessage(s);
{C:\Documents and Settings\wy\My Documents\RAD Studio} SetCurrentDir('..\..');
s := GetCurrentDir;
ShowMessage(s);
{C:\Documents and Settings\wy}end;
- 用 GetEnvironmentVariable 获取常用系统变量
- 用 GetEnvironmentVariable 获取常用系统变量
- 用 GetEnvironmentVariable 获取常用系统变量
- 用 GetEnvironmentVariable 获取系统变量
- GetEnvironmentVariable获取系统变量
- 用 GetEnvironmentVariable 获取常用系统环境变量
- 用 GetEnvironmentVariable 获取常用系统环境变量
- delphi 用 GetEnvironmentVariable 获取常用系统环境变量
- 用 GetEnvironmentVariable 获取常用系统环境变量
- 用 GetEnvironmentVariable 获取常用系统环境变量
- GetEnvironmentVariable 获取系统环境变量
- GetEnvironmentVariable 获取系统环境变量
- GetEnvironmentVariable
- 系统变量文件夹获取
- 获取系统变量
- 获取系统输入变量
- Java常用系统变量
- 常用的系统变量
- Delphi2009 & C++Builder2009 Videos and Resources
- Delphi Distiller
- 手把手教delphi:写你的dll文件
- Delphi 2009 光盘版
- 有关Delphi2009的相关插件及最新组件(20090720)
- 用 GetEnvironmentVariable 获取常用系统变量
- 炒股之前你自我“三问”了吗
- java结果输出,知其所以然
- TClientdataset使用技巧汇总
- 树形控件比较
- Delphi中枚举类型的应用
- 自己写的cnCheckTreeView操作函数(数据库分级函数)测试通过(XP+D2009)
- CentOS显示器分辨率配置
- 常用公共类代码一之数据库的连接