//譬如 WINDIR 是表示系統(tǒng)目錄的系統(tǒng)變量, 可以這樣獲取:
var
s: string;
begin
s := GetEnvironmentVariable('WINDIR');
ShowMessage(s); {C:WINDOWS}
end;
(*--------------------------------------------------------------------------------
WINDIR {系統(tǒng)目錄 - C:WINDOWS}
SYSTEMROOT {系統(tǒng)目錄 - C:WINDOWS}
SYSTEMDRIVE {系統(tǒng)根目錄 - C:}
HOMEDRIVE {當(dāng)前用戶根目錄 - C:}
USERPROFILE {當(dāng)前用戶目錄 - C:Documents and Settingswy}
HOMEPATH {當(dāng)前用戶路徑 - Documents and Settingswy}
TMP {當(dāng)前用戶臨時(shí)文件夾 - C:DOCUME~1wyLOCALS~1Temp}
TEMP {當(dāng)前用戶臨時(shí)文件夾 - C:DOCUME~1wyLOCALS~1Temp}
APPDATA {當(dāng)前用戶數(shù)據(jù)文件夾 - C:Documents and SettingswyApplication Data}
PROGRAMFILES {程序默認(rèn)安裝目錄 - C:Program Files}
COMMONPROGRAMFILES {文件通用目錄 - C:Program FilesCommon Files}
USERNAME {當(dāng)前用戶名 - wy}
ALLUSERSPROFILE {所有用戶文件目錄 - C:Documents and SettingsAll Users}
OS {操作系統(tǒng)名 - Windows_NT}
COMPUTERNAME {計(jì)算機(jī)名 - IBM-B63851E95C9}
NUMBER_OF_PROCESSORS {處理器個(gè)數(shù) - 1}
PROCESSOR_ARCHITECTURE {處理器芯片架構(gòu) - x86}
PROCESSOR_LEVEL {處理器型號(hào) - 6}
PROCESSOR_REVISION {處理器修訂號(hào) - 0905}
USERDOMAIN {包含用戶賬號(hào)的域 - IBM-B63851E95C9}
COMSPEC {C:WINDOWSsystem32cmd.exe}
PATHEXT {執(zhí)行文件類型 - .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 SettingswyMy DocumentsRAD StudioProjects}
SetCurrentDir('..');
s := GetCurrentDir;
ShowMessage(s); {C:Documents and SettingswyMy DocumentsRAD Studio}
SetCurrentDir('....');
s := GetCurrentDir;
ShowMessage(s); {C:Documents and Settingswy}
end;
本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)
點(diǎn)擊舉報(bào)。
