SHGetFolderLocation

[Fridolin Walther]

Delphi-Quellcode:

function PathFromIDList(Pidl: PItemIdList): WideString;
const
  NTFS_MAX_PATH = 32767;
var
  Path : PWideChar;
begin
  GetMem(Path, (NTFS_MAX_PATH + 1) * 2);
  if not SHGetPathFromIDListW(Pidl, Path) then
    begin
      FreeMem(Path);
      raise Exception.Create('Odner kann nicht ermittelt werden');
    end;
  Result := WideString(Path);
  FreeMem(Path);
end;

Wahrscheinlich wird beim SetLength nicht mit 0 initialisiert, was dafür sorgt, daß das abschließende 0-Byte fehlt. GetMem dagegen initialisiert mit 0.

Zitat von Luckie:

Gelesen habe ich sie, nur dachte ich PItemIdList wäre schon der Zeiger wegen des "P"s.

Ist ja auch ein Zeiger. Nur wird halt kein Zeiger auf eine Variable erwartet, sondern ein Zeiger auf einen Zeiger der auf eine Variable zeigt .