Bestimmte user Ordner öffnen

[Ajintaro]

Hallo!

Ich möchte verschiedene Ordner öffnen.
Dazu nutze ich:

Delphi-Quellcode:

procedure ShowFolder(strFolder: string);
begin
  ShellExecute(Application.Handle, PChar('open'), PChar(strFolder), nil, nil, SW_SHOWNORMAL);
end;

Showfolder('C:');

Funktioniert prima. Wenn ich im Windows Explorer zum Beispiel:

%tmp%
%temp%
%USERPROFILE%/Recent

eingebe öffnen sich ebenfalls Fenster mit dem entsprechenden inhalt.

Aber:

Delphi-Quellcode:

procedure ShowFolder(strFolder: string);
begin
  ShellExecute(Application.Handle, PChar('open'), PChar(strFolder), nil, nil, SW_SHOWNORMAL);
end;

Showfolder('%tmp%');

klappt natürlich nicht. Muss ich zuerst den angemeldeten user herausfinden und den string danach umbauen?