In ShellListView Navigieren (Ordner öffnen)

[jfheins]

Naja, kommt auf die datei an.

Exedateien und Verknüpfungen werden ausgefürhrt,
Audio und Video wird abgspielt,
Zip-Archieve werden geöffnet ...

Naja, ist aber auch logisch ... Auszug aus TShellListView:

Delphi-Quellcode:

rocedure TCustomShellListView.DblClick;
begin
  if FAutoNavigate and (Selected <> nil) then
    with Folders[Selected.Index] do
      if IsFolder then
        SetPathFromID(AbsoluteID) // Das will ich, ist aber private .....
      else
        ShellExecute(Handle, nil, PChar(PathName), nil,
          PChar(ExtractFilePath(PathName)), 0); // Das will ich nicht .....
  inherited DblClick;
end;