Wie kann ich einen kompletten TShellTreeView aufklappen, ich mache es mit einer While do Schleife:
Delphi-Quellcode:
While I <= ShellTreeView.Items.Count-1 do begin
ShellTreeView.Items[I].Expanded := True;
Inc(I);
end;
Aber das dauert so lange! Hat das schonmal jemand versucht, als er als Root den Arbeitsplatz eingestellt hatte?
Danke schonmal!