Mit ShellExecute "vorhandenes" Explorerfenster öffnen?

[sko1]

Hallo,

ich nutze ShellExecute um in meinem Programm den Explorer zu öffnen und eine im Programm erzeugte Datei anzuzeigen (zu markieren).

Das funktioniert bestens, außer das bei jedem Aufruf ein neues Explorerfenster geöffnet wird.

Gibt es einen Trick, um ShellExecute zu veranlassen, ein eventuell bereits bestehendes Explorerfenster zu benutzen?

Ciao
Stefan

[Der schöne Günther]

Stattdessen

Delphi-Quellcode:

SHOpenFolderAndSelectItems(..)

benutzen:

https://stackoverflow.com/a/15301028/2298252

Delphi-Quellcode:

uses
  WinApi.ShellApi,
  WinApi.ShlObj;

function OpenFolderAndSelectFile(const FileName: string): boolean;
var
  IIDL: PItemIDList;
begin
  result := false;
  IIDL := ILCreateFromPath(PChar(FileName));
  if IIDL <> nil then
   try
     result := SHOpenFolderAndSelectItems(IIDL, 0, nil, 0) = S_OK;
   finally
     ILFree(IIDL);
   end;
end;

[Glados]

Zitat:

Gibt es einen Trick, um ShellExecute zu veranlassen, ein eventuell bereits bestehendes Explorerfenster zu benutzen?

OpenFolderAndSelectFile öffnet, zumindest unter Windows 7, trotzdem ein neues Fenster WENN der Parameter eine Datei ist. Ist es ein Verzeichnis, funktioniert es so wie der TE es wünscht.
Hab Quatsch erzählt. Muss wohl Zufall gewesen sein, dass sich trotzdem ein neues Fenster geöffnet hat.

[sko1]

Zitat:

Zitat von Der schöne Günther (Beitrag 1377026)

Stattdessen

Delphi-Quellcode:

SHOpenFolderAndSelectItems(..)

benutzen:

https://stackoverflow.com/a/15301028/2298252

Vielen herzlichen Dank, funktioniert hervorragend!

Ciao
Stefan