Wie finde ich die Windows Systempfade z.B : C:\Windows\temp

[Luckie]

Also ich hätte es j aso gemacht:

Delphi-Quellcode:

function GetSysDir: String;
const
  UNLEN = MAX_PATH;
var
  Size: DWORD;
  buffer : array[0..UNLEN] of Char;
begin
  Size := UNLEN + 1;
  if GetSystemDirectory(buffer, Size) <> 0 then
    result := String(buffer)
  else
    result := '';
end;

Und:

Delphi-Quellcode:

function GetWinDir: String;
const
  UNLEN = MAX_PATH;
var
  Size: DWORD;
  buffer : array[0..UNLEN] of Char;
begin
  Size := UNLEN + 1;
  if GetWindowsDirectory(buffer, Size) <> 0 then
    result := String(buffer)
  else
    result := '';
end;