Hello,
ich hab da ein kleines Style-Problem mit meinem ShellTreeView, welches ich gerne mit zwei Bildern veranschaulichen möchte.

http://www.friendnet.at/photos/979d4...c096d9a80.jpeg

http://www.friendnet.at/photos/88a88...bc2198e9c.jpeg


Bild1 zeigt mein Shelltreeview, wenn das Programm gestartet wird.
Bild2 zeigt genau das selbe Shelltreeview, bloß nachdem ich auf Programme geklickt habe.
Beide Shelltreeviews haben als Path: 'C:\Programme\'

Bloß den Unterschied, den man eh sehen kann, will ich nicht haben. Ich hätte gerne von Anfang an, dass 'C:\Programme' markiert ist.

Bitte, wie geht???

Hallo,

man könnte beim Start des Programms folgenden Code ausführen:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  i: integer;
begin
  with ShellTreeView1 do
    for i := 0 to Items.Count - 1 do
      if Folders[i].PathName= 'C:\Programme' then
      begin
        Items.Item[i].Selected:= true;
        break;
      end;
end;

Guten Morgen,

wenn der Pfadname bereits ermittelt wurde, dann muss er eigentlich nicht mehr gesucht werden:

markieren

Delphi-Quellcode:

procedure TShellForm.FormCreate(Sender: TObject);
begin
  ShellTreeView.Path := 'C:\Programme'; // GetSpecialFolderLocation(CSIDL_PROGRAM_FILES{$26});
end;

Grüße vom marabu

Vermutlich steht "TreeView.HideSelection" noch auf True so das die Selektierung nur sichtbar ist wenn das Control das aktive Control ist.