Dossier d'images, ListView et PictureBox?

Version imprimable

21/06/2010, 04h34
Eric_M

Dossier d'images, ListView et PictureBox?
Bonjour,

J'ai un dossier contenant plusieurs images (C:/images).

J'aimerais que pour chaque image dans mon dossier, ils apparaissent toutes dans une ListView et que lorsque que je clique sur l'une d'elles, l'image sélectionnée s'afficherais dans une PictureBox.

Je croix qu'il faut utiliser:
Code:

1 2 3 For Each img As Image In... ListView1.Items.add(img) Next
Mais je ne sais pas comment car "C:/images" est une valeur String.

Je croix bien que c'est faisable mais l'ennuie c'est que je ne sais pas comment :(.

Merci à tous.
21/06/2010, 08h35
hunteshiva

Ah ma connaissance,
il n'y a pas de routine qui puisse lire les fichier dans un dossier ... :?

tu a beaucoup d'images ...?
a ma connaissance tu a deux options :

Soit tu fixes tes images en dur dans un fichier et les chemins sont figés
ou alors tu passe par un "OpenFileDialog" et tu offre la possibilité de charger des images manuellement

voila je ne pense pas pouvoir te donner + d'idées :(

Filesystem

Tu doit utiliser My.computer.filesystem

Code:

1
2
3
4
5
 
 
 For Each str As String In My.Computer.FileSystem.GetFiles("chemin du dossier")
           ListView1.Items.add(str)
Next

21/06/2010, 10h54
Geo2A

Bonjour,

Tu devrais regarder du coter de system.drawing.imaging et de BitmapDecoder.Thumbnail.

je ne sais pas trop comment marche le listview, mais des picturebox dans un flowlayoutpanel ca marche très bien
Code:

1 2 3 4 5 6 7 for each file as string in system.io.directory.getfiles("c:\images") dim img as system.Drawing.image = image.fromfile(file) dim p as new picturebox p.image = img monflowlayoutpanel.items.Add(p) next
Citation:

Envoyé par hunteshiva

Ah ma connaissance,
il n'y a pas de routine qui puisse lire les fichier dans un dossier ... :?

un langage sans ca, ca n'existe pas je pense, ou alors personne travaille avec ...

21/06/2010, 13h27
hunteshiva

:oops: :oops: :oops: :oops: :oops: :oops: :oops:

je n'ais jamais eu besoin de travaillé avec ce genre de fonctions,
c'est pourquoi je précisé bien "a ma connaissance"

je saurais maintenant

Merci à tous de m'avoir répondu :D

J'ai essayé vos codes et ça marche!!

Voici ce que j'utilise:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 Dim nombre As Integer
 
        For Each file As String In System.IO.Directory.GetFiles(My.Computer.FileSystem.CurrentDirectory & "\Images")
            Dim img As System.Drawing.Image = Image.FromFile(file)
            nombre += 1
 
            ImageList1.Images.Add(img)
 
            Dim a As New ListViewItem
            a.Text = file
            a.ImageIndex = nombre
 
 
            ListView1.Items.Add(a)
        Next

Le problème est résolu!

21/06/2010, 20h45
Danyel

Citation:

Envoyé par hunteshiva

je n'ais jamais eu besoin de travaillé avec ce genre de fonctions

Si tu n'as jamais travaille avec l'acces aux fichiers, c'est que tu n'as jamais travaille tout court ;)

Salut à tous,

J'aurais juste besoin d'une ligne de code:
Il faudrait qu'avec le code que j'ai envoyé plus haut, lorsque je clique sur l'un des items, son image apparait dans la picturebox.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
  Dim nombre As Integer
 
        For Each file As String In System.IO.Directory.GetFiles(My.Computer.FileSystem.CurrentDirectory & "\Images")
            Dim img As System.Drawing.Image = Image.FromFile(file)
            nombre += 1
 
            ImageList1.Images.Add(img)
 
            Dim a As New ListViewItem
            a.Text = file
            a.ImageIndex = nombre
 
 
            ListView1.Items.Add(a)
        Next