Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   ListView mit Zip-Archiven aber ohne Ordnern (https://www.delphipraxis.net/186361-listview-mit-zip-archiven-aber-ohne-ordnern.html)

null33 27. Aug 2015 09:16

ListView mit Zip-Archiven aber ohne Ordnern
 
Hallo liebe Leute,

Ich habe eine kleine Denkblockade:
Wie kann ich in einer ShellListView ZIP Dateien anzeigen lassen ohne die Ordner dabei anzeigen zu lassen?
Sehe die ZIP Dateien erst wenn ich "ShowFolders" auf True setze.

Problem ist, in einer Schleife in der ich die Dateien zähle, werden die ZIP Dateien (korrekterweise) mitgezählt, sind dann allerdings in der Listview nicht sichtbar.

Hat jemand eine Idee oder einen kleinen Anstoß für mich?

Danke im Vorraus und viele Grüße!

Lemmy 27. Aug 2015 09:20

AW: ListView mit Zip-Archiven aber ohne Ordnern
 
die Shell-Listview weg werfen und die Dateinamen kurz selber auslesen und in einem zweiten (!) Schritt die GUI-Anzeige in einem normalen Listview (oder was anderem) erledigen?

Grüße

null33 27. Aug 2015 09:24

AW: ListView mit Zip-Archiven aber ohne Ordnern
 
Wäre dann wohl die einzige Alternative entnehme ich deiner Aussage?
Dachte es gäbe vielleicht eine Property die ich übersehen habe, bin noch neu in Sachen Delphi.

Danke!

Lemmy 27. Aug 2015 09:31

AW: ListView mit Zip-Archiven aber ohne Ordnern
 
das weiß ich nicht. Und ganz ehrlich: ich finde FindFirst und Co. beschÜÜÜÜ und versuche drum rum zu kommen - in den neueren Delphis gibt es dazu ja auch sinnvolle Alternativen.

Aber was ich inzwischen grundsätzlich vermeide: Irgend eine visuelle Komponente die irgend was anderes macht außer Daten anzeigen. Denn seien wir ehrlich: Nur Anzeigen wirst Du die zipFiles da sicherlich nicht sondern irgend was damit machen. Und dann fangen die Probleme langsam an...

null33 27. Aug 2015 09:36

AW: ListView mit Zip-Archiven aber ohne Ordnern
 
Irgendwas mit machen schon, aber nicht über die GUI, also es sollen keine Dateien über die ShellListView ausgewählt werden.
Das Projekt an dem ich arbeite ist ein einfaches Programm zum Dateien verschieben / kopieren / archivieren. Und wenn ich archivieren soll, wäre es schon toll wenn ich diese sehen könnte :-D

Wie würdest du denn nach Dateien suchen, wenn nicht mit FindFirst etc, bzw warum nicht?

Sir Rufo 27. Aug 2015 09:47

AW: ListView mit Zip-Archiven aber ohne Ordnern
 
Zitat:

Zitat von Lemmy (Beitrag 1313677)
das weiß ich nicht. Und ganz ehrlich: ich finde FindFirst und Co. beschÜÜÜÜ und versuche drum rum zu kommen - in den neueren Delphis gibt es dazu ja auch sinnvolle Alternativen.

Diese Alternativen verwenden intern FindFirst & Co.. Du kommst nicht drum rum, sondern benutzt die über einen Wrapper. Und so sollte man damit auch umgehen. Gibt es keinen (passenden) Wrapper, dann erstelle ich mir einen.

Im Übrigen sind viele von den neuen Sachen, einfach nur die alten Sachen mit einem neuen Mäntelchen ;)

Klaus01 27. Aug 2015 09:48

AW: ListView mit Zip-Archiven aber ohne Ordnern
 
ab XE7(?) gibt es TDirectory.getFiles

Grüße
Klaus

Lemmy 27. Aug 2015 09:49

AW: ListView mit Zip-Archiven aber ohne Ordnern
 
Zitat:

Zitat von null33 (Beitrag 1313680)
Wie würdest du denn nach Dateien suchen, wenn nicht mit FindFirst etc, bzw warum nicht?

weil ich ohne im Netz zu suchen den genauen Ablauf bis zum CloseFile mir schlicht nicht merken kann und zum Schreiben einer KLasse ich immer zu faul war :-) In den neueren Delphis gibt es imho bei TDirectory ne Möglichkeit Dateien eines Verzeichnisses aufzulisten und auszuwerten.

Aber selbst bei Delphi 7 würde ich eher FindFirst nehmen bevor ich ne ShellListView verwenden würde. Du hast mit FindFirst die Dateinamen am Ende in einer universell einsetzbaren Liste (sei es als String oder ggf. auch als KLasse wenn weitere Infos notwendig sind) und kannst dann bel. damit arbeiten - vom Anzeigen bis zum suchen, auswerten und kopieren.


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:01 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz