Wie bereits gesagt, sollte man das Windows Verzeichniss über Windows
API ermitteln.
Delphi-Quellcode:
function GetWinDir:String;
var
Buffer: PAnsiChar;
Len:Cardinal;
begin
Buffer := nil;
Len := GetWindowsDirectory(Buffer,0);
Buffer := allocMem(Len);
GetWindowsDirectory(Buffer,Len);
Result := Buffer;
FreeMem(Buffer);
end;