PDA

View Full Version : سوال: مشکل با picturebox



sinaone1
سه شنبه 09 شهریور 1389, 19:43 عصر
دوستان میدونید زمانی که یه تصویر رو درون یه picturebox باز میکنیم تا برنامه بسته نشه نمیشه اون تصویر رو پاک کرد یا تغییر داد این مشکل رو چطور میشه حل کرد
ممنون

MAHDIACTION
سه شنبه 09 شهریور 1389, 20:36 عصر
سلام دوست من
من هم قبلا هم همين مشكل رو داشتم.

شما اول بايد PictureBox رو Nothing كنيد و بعد كمي طول مي كشه كه سيستم عامل دست از سر فايل عكس برداره به خاطر همين من يه حلقه 850 تايي گذاشتم كه بعد از رها سازي عكس حذف بشه.
شايد دوستان نظرات ديگه اي داشته باشند ولي اين كار من عملي هست.
كد مورد نظر :


Dim bln_DeleteAndCopyPicture As Boolean = False
Dim intcounter As Integer = 0
While bln_DeleteAndCopyPicture = False
Try
intcounter += 1
PictureBox1.Image = Nothing
PictureShowfrm.PictureBox1.Image = Nothing
PictureFrm.PictureBox1.Image = Nothing
If Val(OpenFileDialog1.FileNames.Length.ToString) > 0 Then
If My.Computer.FileSystem.DirectoryExists(Application .StartupPath & "\bank\Mantaghe" & "\" & CmbMantaghe.Text) = True Then
If My.Computer.FileSystem.FileExists(Application.Star tupPath & "\bank\Mantaghe" & "\" & CmbMantaghe.Text & "\" & TxtShEshterak.Text & ".jpg") = True Then
My.Computer.FileSystem.DeleteFile(Application.Star tupPath & "\bank\Mantaghe" & "\" & CmbMantaghe.Text & "\" & TxtShEshterak.Text & ".jpg")
End If
End If
End If
bln_DeleteAndCopyPicture = True
Catch ex As Exception
End Try
If intcounter >= 850 Then
bln_DeleteAndCopyPicture = True
MsgBox(" ¢­يی© ںیë پ©يë§ى ¥¨ه 묧", MsgBoxStyle.Critical, "¦لں")
End If
End While

nasim bahari
سه شنبه 09 شهریور 1389, 20:46 عصر
سلام.......

اگه از Load Picture استفاده می کنی.فقط کافیه اونو رو با یه رشته تهی "" مقدار دهی کنی..

موفق باشین

Saman_12
سه شنبه 09 شهریور 1389, 21:09 عصر
دوست عزیز شما که این همه اطلاعات دارید دیگه چرا ؟:قهقهه:
خیلی ساده هست شما از متد FromFile برای لود تصاویر استفاده می کنید که من خودم به شخصه راهی به جزء بستن ندیدم (راه جناب MAHDIACTION نیز کا می کنه) اما اگه از متد Load استفاده کنید تصویر شما بدون نوشتن هیچ کد اظافه ای قابل تغییر هست .(بدون ریست کردن فرم.)

nasim bahari
سه شنبه 09 شهریور 1389, 21:52 عصر
ضمن عذر خواهی از دوستان ، به خصوص دوست خوبم سامان جان !

یه اشتباه لپی بوده و منظور من همون FromFile بوده.....متاسفم! :شیطان::قلب::شیطان: