+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] كيف اجعل زر او نافذة تساوى صورة ليست فى الريسورس ولكن على الجهاز؟؟؟ (/showthread.php?tid=19693)
كيف اجعل زر او نافذة تساوى صورة ليست فى الريسورس ولكن على الجهاز؟؟؟ - Mohamed371 - 17-03-17
كيف اجعل زر او نافذة تساوى صورة ليست فى الريسورس ولكن على الجهاز؟؟؟
RE: كيف اجعل شئ داخل برنامجى يساوى صورة خارج البرنامج؟؟؟ - thevirus - 19-03-17
هل يمكن ان توضح اكثر
RE: كيف اجعل شئ داخل برنامجى يساوى صورة خارج البرنامج؟؟؟ - silverlight - 20-03-17
يا إما توضح تحديدا اي جزء من الفورم تحتاج تحويله الي صورة و تحفظها في فولدر البرنامج مثلا
او إنك تأخذ صورة كاملة للفورم و تضعها علي فهرس المشروع او في اي مكان اخر علي الهارد ديسك
ده لو انا فهمت سؤالك بشكل صحيح
ممكن تستخدم الكود التالي لأخذ صورة كاملة للفورم
ثم تحفظ الصورة التي تحصل عليها من الدالة CaptureFormImage علي الهارد ديسك
PHP كود :
Private Function CaptureFormImage() As Bitmap
Dim formRect As Rectangle = New Rectangle(Me.Bounds.Location, Me.Bounds.Size)
Dim pt As Point = New Point(0 - Me.Location.X, 0 - Me.Location.Y)
Dim r As Rectangle = TrnasformRect(pt, formRect)
Dim formBitmap As Bitmap = New Bitmap(r.Width, r.Height)
Me.DrawToBitmap(formBitmap, r)
Return formBitmap
End Function
Public Function TrnasformRect(offset As Point, originalRect As Rectangle) As Rectangle
Return New Rectangle(originalRect.X + offset.X, originalRect.Y + offset.Y, originalRect.Width, originalRect.Height)
End Function
ويحتاج الي بعض الوقت و المجهود قليلا
RE: كيف اجعل زر او نافذة تساوى صورة ليست فى الريسورس ولكن على الجهاز؟؟؟ - أسامة السالمي - 24-03-17
اذا كنت تقصد استيراد صورة موجود في الكمبيوتر الى البرنامج،
فيمكنك استخدام هذا الكود :
PHP كود :
PictureBox1.Image = Image.FromFile("مسار الصورة")