Erklärung zu Code gesucht...

[Win32.API]

Versuchs mal so:

Delphi-Quellcode:

function GetWinDir(): PChar; stdcall;
var tmp : String;
begin
  SetLength(tmp, MAX_PATH);
  SetLength(tmp, GetWindowsDirectory(PChar(tmp), MAX_PATH));
  result := pchar(tmp);
end;

--win32