نمایش چندتصویر در یک picturebox

[misagh1370]

با سلام
دوستان میخوام به برنامم این امکان رو بدم که توسط open file dialog یک پوشه ی دلخواه رو باز کنه و یک تصویر رو انتخاب کنه و اون تصویر در جعبه تصویر نشون داده بشه.یه دکمه ی back و nextهم توی فرمم بذارم و بدون استفاده از open file diolagتصاویری که در اون پوشه که قبلا انتخاب کردم رو یکی یکی در جعبه تصویرم نشون بدم.
دوستان و مهندسان عزیز ممنون میشم لطف کنید راهنماییم کنید.خیلی احتیاج دارم.
سپاس فراوان

[mohamad_torabi]

با سلام
دوستان میخوام به برنامم این امکان رو بدم که توسط open file dialog یک پوشه ی دلخواه رو باز کنه و یک تصویر رو انتخاب کنه و اون تصویر در جعبه تصویر نشون داده بشه.یه دکمه ی back و nextهم توی فرمم بذارم و بدون استفاده از open file diolagتصاویری که در اون پوشه که قبلا انتخاب کردم رو یکی یکی در جعبه تصویرم نشون بدم.
دوستان و مهندسان عزیز ممنون میشم لطف کنید راهنماییم کنید.خیلی احتیاج دارم.
سپاس فراوان
منظورتون یه چیزی مثل اسلاید هستش؟

[misagh1370]

بله دوست من.دوستان عزیز اگه سورسش رو دارین لطف کنید بهم بدین.سپاس

[aliagamon]

یه چیزی تو این مایه ها استفاده کن :

Dim count As Integer = 0
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim allpics As String() = Directory.GetFiles("C:\Users\Ali\Pictures")
PictureBox1.Image = Image.FromFile(allpics(count))
count += 1
End Sub

خودت روش کار کن به چیزی که میخوای میرسی..

[misagh1370]

دوست عزیز ممنون از راهنمییت اما در قسمتی که آدرس دادین اگه بخوام آدرس ثابتی نباشه باید چکار کنم؟
بازم ممنوم

[aliagamon]

اول این که کد بالا یه نمونه بود و به مشکل میخوری مثلا اگه allpics رو شما گلوبال (همه گانی مانند count) تعریف کنید بهتره .... و اینکه شما باید چک کنین فایل عکس هست یا نه ...
میتونید از FolderBrowserDialog استفاده کنید ....:لبخند:

[misagh1370]

حالا که نمونه های مختصر و مفیدی بلدی میشه واسه استفاده از FolderBrowserDialog به جای نوشتن آدرس هم یه نمونه واسم بذاری؟؟؟؟؟؟؟
ممنون میشم .خیلی مهندسی:خجالت:

[aliagamon]

حالا که نمونه های مختصر و مفیدی بلدی میشه واسه استفاده از FolderBrowserDialog به جای نوشتن آدرس هم یه نمونه واسم بذاری؟؟؟؟؟؟؟
ممنون میشم .خیلی مهندسی:خجالت:
نیازی به هندونه نبود میگفتی میزاشتم:لبخند:

Dim count As Integer = 0
Dim allpics As String()
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PictureBox1.Image = Image.FromFile(allpics(count))
count += 1
End Sub


Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim folderbrowser As FolderBrowserDialog = New FolderBrowserDialog()
folderbrowser.ShowDialog()
allpics = Directory.GetFiles(folderbrowser.SelectedPath)
End Sub

[misagh1370]

دوست من دمت گرم .
موفق باشی:تشویق:

[misagh1370]

یه سوال دیگه : چطور چک کنم که فایل مورد نظر عکس هست یا خیر؟:گیج:

[aliagamon]

میتونید دستی شزط بنویسید اما میتونید از این تابع هم استفاده کنید :
http://www.beansoftware.com/ASP.NET-FAQ/Multiple-Filters-Directory.GetFiles-Method.aspx
جای GetFiles استفاده کن ... میتونی چندتا فرمت رو انتخاب کنی(خودش چک میکنه )