如何得知当前WINDOWS操作系统的文件夹的名字?
一般 WIN9.X 默认的是 WINDOWS,WIN2000 默认的是 WINNT.但是安装前是可以改的但我如何判断?

解决方案 »

  1.   

    使用API函数:  GetSystemDirectory.
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      s:array[0..255] of char;
    begin
      getWindowsDirectory(s,256);
      showMessage(s);
    end;
      

  3.   

    var s1,s2,s3:array[1..40] of char;z1,z2:string;
    begin
    getwindowsdirectory(@s1,40);
    getsystemdirectory(@s2,40);
    z1:=trim(s1);
    z2:=trim(s2);
    showmessage(z1);
    showmessage(z2);
    end;