Hy @all,

ich schreibe gerade eine Windows-Explorer-ähnliche Anwendung.

Folgende Aufgabe: aIn einem Verzeichnis x liegen (beispielsweise 12 Bilder).
Ich möchte jetzt mit dem ListView 2 verschieden Ansichten machen.
Zum ersten eine "Miniaturansicht"
Zum zweiten eine einspaltige Listansicht.

Mein Problem nun, wie bekomme ich die Miniaturansicht realisiert. Hat da jemand von euch einen Vorschlag?

Ich bin bereits soweit, dass ich Thumbnails der Bilder in eine Imagelist einfüge.
Nun Folgendes:

Wenn ich ein Bild aus der Imagelist einer Picturebox zuweise...

for i = 1 to 12
Picture1(i).Picture = ImageList1.ListImages(i).Picture
next i

klappt das anstandslos.


Ich möchte, um die Listview zu füllen folgende Schleife verwenden.
Das wiederum funktioniert leider nicht

lstView.View=lvwIcon
for i = 1 to 12
lstView.ListItems.Add , , Bildname(i), ImageList1.ListImages(i).Picture
next i


Jede Hilfe wäre mir sehr hilfreich!

Thnx a lot

CyberDreams