تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] سؤال هام : حذف صورة معروضة فى مربع صور ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
#31
(04-07-20, 06:33 PM)DR.YASER كتب :
السلام عليكم و رحمة الله و بركاته
زملائى الأفاضل .. 

الحمد لله و بفضل مساعدتكم العظيمة لى .. تمكنت من حل المشكلة باستخدام هذا الكود :


كود :
 If IO.File.Exists(Me.Tag) Then
                   Try
                       My.Computer.FileSystem.DeleteFile(Me.Tag, FileIO.UIOption.AllDialogs, FileIO.RecycleOption.SendToRecycleBin, FileIO.UICancelOption.ThrowException)
                       cImage.Dispose()
                       cImage = Nothing
                       ImgRect.Location = New Point(0, 0)
                       ImgRect.Size = Me.ClientSize
                       SetWindowTitle()
                       Me.CreateGraphics.Clear(Me.BackColor)
                       Catch ex As OperationCanceledException
                       ' nothing to here!
                   Catch ex As IO.IOException
                       MsgBox("The file is currently used by another process. ", MsgBoxStyle.Critical, "InView")
                   End Try
               Else
                   MsgBox("File not found. ", MsgBoxStyle.Critical, "InView")
End If

و عليكم السلام و رحمة الله و بركاته
   
دكتور ياسر ما تم عمله في الكود الذي تفضلت فيه حضرتك هو كود لتفادي الخطأ و اظهار مربع حوار تأكيد الحذف
أما حذف ملف الصورة فهو مستحيل قبل اغلاق فيجوال بيسك اذا تم اخيار الصورة وقت التصميم
الرد
تم الشكر بواسطة:
#32
(04-07-20, 11:32 PM)Mohamad Anan كتب :
(04-07-20, 06:33 PM)DR.YASER كتب :
السلام عليكم و رحمة الله و بركاته
زملائى الأفاضل .. 

الحمد لله و بفضل مساعدتكم العظيمة لى .. تمكنت من حل المشكلة باستخدام هذا الكود :


كود :
 If IO.File.Exists(Me.Tag) Then
                   Try
                       My.Computer.FileSystem.DeleteFile(Me.Tag, FileIO.UIOption.AllDialogs, FileIO.RecycleOption.SendToRecycleBin, FileIO.UICancelOption.ThrowException)
                       cImage.Dispose()
                       cImage = Nothing
                       ImgRect.Location = New Point(0, 0)
                       ImgRect.Size = Me.ClientSize
                       SetWindowTitle()
                       Me.CreateGraphics.Clear(Me.BackColor)
                       Catch ex As OperationCanceledException
                       ' nothing to here!
                   Catch ex As IO.IOException
                       MsgBox("The file is currently used by another process. ", MsgBoxStyle.Critical, "InView")
                   End Try
               Else
                   MsgBox("File not found. ", MsgBoxStyle.Critical, "InView")
End If

و عليكم السلام و رحمة الله و بركاته

دكتور ياسر ما تم عمله في الكود الذي تفضلت فيه حضرتك هو كود لتفادي الخطأ و اظهار مربع حوار تأكيد الحذف
أما حذف ملف الصورة فهو مستحيل قبل اغلاق فيجوال بيسك اذا تم اخيار الصورة وقت التصميم


أشكرك أستاذ محمد .. لكن الحمد لله هو الكود عمل معى بنجاح لاسيما و قد استخدمت فئة تفريغ الذاكرة و أخرى Dispose لاغلاق مربع الصور ..
 شكرا لملاحظتك رغم حزنى من ردك السابق و عتابى على كلامك الأخير . لكن تقبل منى كل الاحترام و التقدير
الرد
تم الشكر بواسطة:
#33
Heart 
اتمنى ان تتقبل وجهة نظري برحابه صدر وهذه الحكمه البسيطه ولا تاخذ في خاطرك مني فاحنا في هذا المنتدى اكثر من اخوه من كل دوله في العالم اجتمعنا 

*ليس من الذكاء ان تنتصر في الجدال وانما من الذكاء الا تدخل في الجدال اصلا *
الرد
تم الشكر بواسطة:
#34
(05-07-20, 12:17 PM)alshandodi كتب : اتمنى ان تتقبل وجهة نظري برحابه صدر وهذه الحكمه البسيطه ولا تاخذ في خاطرك مني فاحنا في هذا المنتدى اكثر من اخوه من كل دوله في العالم اجتمعنا 

*ليس من الذكاء ان تنتصر في الجدال وانما من الذكاء الا تدخل في الجدال اصلا *

أخى الفاضل : alshandodi
أشكرك على كلماتك المهذبة العطرة و التى أثلجت صدرى 
فعلا لديك الحق و كل الحق : 

[quote pid='163818' dateline='1593937063']
*ليس من الذكاء ان تنتصر في الجدال وانما من الذكاء الا تدخل في الجدال اصلا *
[/quote]

لقد ضايقنى فعلا أن أتعرض لهذا الهجوم الغير مبرر من زملاء و أخوة لم أسئ لأى منهم .. ف العموم أشكرك على كلامك الطيب و نصيحتك القيمة التى سأعمل بها عن قناعة
الرد
تم الشكر بواسطة: alshandodi



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم