Discussion :

[jcs2]

Utilisation de ShellTreeView qui n'est pas documenté au moins dans Delphi 7 personnel

Avec le code qui suit je récupère dans l'arborescence des fichiers, le répertoire qui a été cliqué:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
procedure TDirForm.ShellTreeView1Change(Sender: TObject; Node: TTreeNode);
begin
  with Node do begin
     if ( AbsoluteIndex<> 0 ) then
       Répertoire := ShellTreeView1.Folders[AbsoluteIndex].PathName;
  ...

Je voudrais aussi pouvoir faire l'inverse et je n'y arrive pas.

A partir d'un répertoire donné, comment prépositionner/sélectionner celui-ci lors de l'affichage de l'arborescence
qui par défaut n'est pas développé? L'utilisateur doit donc à chaque fois développer chaque noeud ce qui est très pénalisant.

Merci pour vos réponses

[jcs2]

Personne n'utilise donc TreeView ou ShellTreeView?

[tatareau]

Tu dois avoir la propriété PathName en lecture seule. Regarde le source de ton composant si tu l'as. De plus dans ce cas la fonction reciproque, dans une bonne pratique de pgm, est generalement une méthode type GetPathName...
Je ne connais pas ton composant, bonne recherche...uses concernée est ShellCtrls.pas correspondant dans ..\Delphi7\Demos\ShellControls
Bon courage