Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Wie kann ich alle Dateien im ShellListView markieren, aber n


stefanstp - Mi 23.10.02 19:58
Titel: Wie kann ich alle Dateien im ShellListView markieren, aber n
Mit


Quelltext 
1:
2:
3:
4:
5:
6:
7:
 
var
x:integer;
begin
for x:=0 to ShellListView1.Items.Count-1 do
begin
ShellListView1.Items.Item[x].Selected:=true;
end;


kann ich alles markieren. Aber da nimmt er auch die Ordner mit. Wie kann ich nur Dateien markieren?


Wer kann helfen? Besten Dank im Voraus!!!

STEFAN


FriFra - Mi 23.10.02 22:49
:D So gehts:

Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
 
var 
x:integer;
begin
  for x := 0 to ShellListView1.Items.Count - 1 do
  begin
    if FileExists(ShellListView1.Folders[x].PathName) then
      ShellListView1.Items[x].Selected := True;
  end;
end;


stefanstp - Do 24.10.02 07:31
Titel: DANKE!
Werde ich doch gleich mal heute Abend ausprobieren! Danke für die schnelle Antwort!!!

STEFAN


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!