Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Ansicht ändern der Filelistbox (https://www.delphipraxis.net/56127-ansicht-aendern-der-filelistbox.html)

Sleepy 1. Nov 2005 11:01


Ansicht ändern der Filelistbox
 
Hallo!

Das gibt es doch nicht bekomme es nicht hin die Ansicht einer Filelistbox z.B. auf Details oder List umzustellen. Kann mir einer helfen? :shock: Ich bin schon etwas am verzweifeln.... kann doch nicht so schwer sein....



viele Grüsse Sleepy...

Union 1. Nov 2005 11:10

Re: Ansicht ändern der Filelistbox
 
Hallo,

zunächst benötigtst Du keine FileListBox sondern eine ShellListView. Dort kannst Du dann den ViewStyle = (vsIcon, vsList, vsReport, vsSmallIcon) einstellen.

Luckie 1. Nov 2005 11:12

Re: Ansicht ändern der Filelistbox
 
Die FileListBox ist eben ine ListBox und die kennt eben nur eine Spalte, nämlich mit den Dateien. Entweder du schreibst dir selber was, benutzt Fremdkomponenten oder, wenn vorhanden, benutzt du die Shell-Komponenten von deiner Delphi Version.

Union 1. Nov 2005 11:16

Re: Ansicht ändern der Filelistbox
 
Zitat:

Zitat von Luckie
und die kennt eben nur eine Spalte, nämlich mit den Dateien.

Das stimmt nicht ganz, denn die wird mit OwnerDraw gezeichnet. Es gibt eine Eigenschaft ShowGlyphs. Dann ist die Anzeige einer Billigversion der ShellListView vsSmallicons. Aber sehr billig, sieht aus wie Win 3.1 ;)

Sleepy 1. Nov 2005 11:27

Re: Ansicht ändern der Filelistbox
 
Na das ist doch mal echt ne superschnelle und hilfreiche Antwort....
Und ich hab mir den halben Vormittag um die Ohren geschlagen auf der Suche nach der richtigen Property. Vielen Dank.
Kann ich bei dieser Komponente auch irgendwie einen Filter setzen? Die FilterCombobox kennt das Ding leider nicht.


:gruebel:

Union 1. Nov 2005 11:36

Re: Ansicht ändern der Filelistbox
 
Hallo Sleepy,

das machst Du im Event OnAddFolder. Der wird aufgerufen, bevor eine Datei oder ein Verzeichnis zur ListView hinzugefügt wird.

[Edit]
Hier ein kleines Beispiel:
Delphi-Quellcode:
uses masks;

procedure TForm1.ShellListView1AddFolder(Sender: TObject;
  AFolder: TShellFolder; var CanAdd: Boolean);
begin
  if not AFolder.IsFolder then
     CanAdd := MatchesMask(AFolder.Pathname, '*.exe');
end;
[/Edit]

Sleepy 1. Nov 2005 12:24

Re: Ansicht ändern der Filelistbox
 
Oh Jaaaaaaaa!!!!

Vielen Dank das funzt echt super. Bin sehr begeistert.... macht weiter so :)

:hello: Sleepy:= happy;


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:06 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