Forum: Sonstige Fragen zu Delphi
Delphi
by Union,
1. Nov 2005
Hallo Sleepy,
das machst Du im Event OnAddFolder. Der wird aufgerufen, bevor eine Datei oder ein Verzeichnis zur ListView hinzugefügt wird.
Hier ein kleines Beispiel:
uses masks;
procedure TForm1.ShellListView1AddFolder(Sender: TObject;
AFolder: TShellFolder; var CanAdd: Boolean);
Forum: Sonstige Fragen zu Delphi
Delphi
by Union,
1. Nov 2005
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 ;)
Forum: Sonstige Fragen zu Delphi
Delphi
by Union,
1. Nov 2005
Hallo,
zunächst benötigtst Du keine FileListBox sondern eine ShellListView. Dort kannst Du dann den ViewStyle = (vsIcon, vsList, vsReport, vsSmallIcon) einstellen.