在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
//譬如 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 {搜索路径} 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; |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论