Parsen von EnvironmentPath

[EWeiss]

Zitat von Uwe Raabe:

Zitat von EWeiss:

Hmmm nun wie geht's besser ?
Mal davon abgesehen das mein Array schon immens definiert ist.
Könnte das Array dynamisch machen so wie von @Schokohase vorgeschlagen.

Das hätte den Nachteil, daß du den Speicher in der aufrufenden Methode wieder freigeben musst.

Ich würde es mir da ganz einfach machen und statt dessen überall mit string arbeiten, wo es die Windows-API nicht ausdrücklich anders vorschreibt.

Ok Danke werde es ändern.

Delphi-Quellcode:

function TShortCut.ExpandEnvironment(const EnvironmentPath: string): string;
var
  lpDest: array [0 .. 32768] of WideChar;
begin

  result := '';
  FillChar(lpDest, SizeOf(lpDest), 0);
  if ExpandEnvironmentStringsW(PWideChar(EnvironmentPath), lpDest, 32767) <> 0 then
    result := lpDest;
end;

gruss