Arbeitsplatz öffnen

[marabu]

Hallo Savar,

ohne Verknüpfung haben wir das in einem anderen thread so gelöst:

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;

Grüße vom marabu