Und wenn du schonmal dabei bist, dann versuche auch mal:
Delphi-Quellcode:
uses
SysUtils,
ShellApi;
var
exeName: string;
begin
exeName := IncludeTrailingPathDelimiter(GetEnvironmentVariable('WINDIR')) + 'explorer.exe';
ShellExecute(GetDeskTopWindow, 'open', PChar(exeName), '/e,/root,c:\daten', nil, SW_SHOW);
end;
marabu