ShellListView igen!

Du bruger OnDblClick event\'en og SelectedItem

Selected hedder den det er en TListItem eller SelectedFolder som er en TShellFolder

/Martin

det har jeg prøvet men den giver ikke noget resultat.
Men jeg fandt denne her i ShellCtrls.pas:

  if (Selected <> nil) then
    with Folders[Selected.Index] do
      if IsFolder then
        SetPathFromID(AbsoluteID)
      else
        ShellExecute(Handle, nil, PChar(PathName), nil,
          PChar(ExtractFilePath(PathName)), 0);


men jeg kan ikke få den til at virke pga. a SetPathFromID()...!

den skulle blot fliks-flakses lidt...

  with LeftFileList do begin
  if (Selected <> nil) then
    with Folders[Selected.Index] do begin
      if IsFolder then
        Root := Folders[Selected.Index].PathName
      else
        ShellExecute(Handle, \'open\', PChar(PathName), nil,
          PChar(ExtractFilePath(PathName)), SW_NORMAL);
    end;
  end;

men du førte mig på sporet. tak for det :)