如何找到并取得当前操作系统的system或者systemp32目录

Question

有没有什么方法或者函数取得当前操作系统的system或者systemp32目录

Answer 1

var
  buffer:array[0..128] of char;
begin
 GetSystemDirectory(buffer,sizeof(buffer));
 Caption:=buffer;
end;

Answer 2

var lpBuffer:Pchar;   {API函数必须使用null结尾的字符串} 
Size:WORD;             {返回的系统子目录字符串实际长度} 
begin 
 lpBuffer:=StrAlloc(255);{预留字符串长度} 
 Size:=GetSystemDirectory(lpBuffer,255);end;

Answer 3

function SetEnvVarValue(const VarName, 
  VarValue: string): Integer;
begin
  // Simply call API function
  if Windows.SetEnvironmentVariable(PChar(VarName),
    PChar(VarValue)) then
    Result := 0
  else
    Result := GetLastError;
end;这是设置环境变量 得到相反即可！
systemroot是环境变量
windir也可以

Answer 4

用环境变量，比如可以通过%SystemRoot%\system 或%SystemRoot%\system32来读取目录
好像windir也是指向windows或winnt目录的，你可以用set命令来看一下！