Foto uit dir weergeven in picturebox

[Doofenshmirt]

Hoi,

Wil foto's die in een dir staan weergeven in een picturebox.

Een foto weergeven in een picturebox is natuurlijk geen probleem , maar de foto's wisselen nogal eens.


Iemand een idee ?

 

[MartinJM]

Bedoel je dat de foto dezelfde naam behoud en dat de inhoud veranderd of dat je steeds een ander plaatje met een andere naam erin wilt hebben?

MartinJM

 

[Doofenshmirt]

Ben op zoek naar iets dat alle foto's ongeacht de naam deze weergeeft in een picturebox.


Deze foto's komen 1 bepaalde map bv C:\foto

Bij het starten gaat het programma gaat hij kijken of er foto's in deze map staan , als deze er instaan deze weergeeft in een picturebox.

Misschien met een timer of iets naar de volgende foto ?


Heb een programma voor iemand gemaakt , dit is klaar maar wil graag iets met foto's doen.
Hij zou dan graag wat foto's van het bedrijf er in doen .

Soort slide show idee.

 

[MartinJM]

Om alle foto's uit een map te halen kan je dit gebruiken:

        Dim fileinf As New ArrayList
        Dim dirinf As System.IO.DirectoryInfo
        dirinf = New System.IO.DirectoryInfo("C:\Users\Martin\Pictures")

        For Each File As IO.FileInfo In dirinf.GetFiles("*.jpg", IO.SearchOption.TopDirectoryOnly)
            fileinf.Add(File)
        Next

Deze code zorgt ervoor dat alle bestanden met de extensie ".jpg" in een array gezet worden. Die array kan je dan vervolgens weer uitlezen.

Succes!:thumb:
MartinJM


*EDIT*
Uitlezen kan dan bv. zo:

        For teller As Integer = 0 To fileinf.Count - 1 Step 1
            TextBox1.Text &= CType(fileinf(teller), IO.FileInfo).FullName & vbNewLine
        Next

Hierdoor zullen alle namen onder elkaar in "Textbox1" worden gezet... Dat moet je dan dus nog wel wat aanpassen....

 

[Doofenshmirt]

Ik ga er mee aan de slag , alvast bedankt.