Zitat:
Aber das dauert so lange! Hat das schonmal jemand versucht, als er als Root den Arbeitsplatz eingestellt hatte
Mal ehrlich gesagt: was macht das für einen Sinn, den gesamten Arbeitsplatz aufzuklappen?
Der Baum wird ja dann riesengross!!
Zitat:
Wie kann ich einen kompletten TShellTreeView aufklappen,
So geht's schneller:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
i := 0;
ShellTreeView1.Items.BeginUpdate;
try
while I <= ShellTreeView1.Items.Count - 1 do begin
ShellTreeView1.Items[I].Expanded := True;
Inc(I);
end;
finally
ShellTreeView1.Items.EndUpdate;
end;
end;