+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : اضهار صورة في MDIP (/showthread.php?tid=35380)
اضهار صورة في MDIP - alshandodi - 27-06-20
السلام عليكم اخوتي الأعزاء لقد قمت باختيار صورة اريد جعلها خلفية لــ MdiParint ولكن دون جدوى وهذا الكود المستخدم والصورة لا تظهر ابدا من الرغم اني جعلتها في بيتشر بوكس وتظهر
كود :
Me.BackgroundImage = GetImage2("Loging")
Dim ctl As Control
Dim ctlMDI As MdiClient
For Each ctl In Me.Controls
Try
ctlMDI = CType(ctl, MdiClient)
Catch exc As InvalidCastException
End Try
NextRE: اضهار صورة في MDIP - kiki - 27-06-20
وعليكم السلام ورحمة الله وبركاته
تخيل لو ردى عبارة عن فقط التالى
؟؟؟؟؟؟؟؟؟؟
GetImage2("Loging")
اين كود الفنكشن الخاص بـ GetImage2
واذا متطلب مسار صورة فهل ما تره من كلمة Loging
هو كا مسار الصورة المطلوب استخدامها ؟؟
RE: اضهار صورة في MDIP - alshandodi - 27-06-20
كود :
Public Function GetImage2(path As String) As Image
Dim bmp As Image
Dim fs As New IO.FileStream("Data\" & path & ".jpg", IO.FileMode.Open, IO.FileAccess.Read)
bmp = Image.FromStream(fs)
fs.Close()
fs = Nothing
Return bmp
End FunctionRE: اضهار صورة في MDIP - kiki - 27-06-20
قم بحذف الـ Function
واستبدل هذا السطر
Me.BackgroundImage = GetImage2("Loging")
ليصبح
Me.BackgroundImage = System.Drawing.Image.FromFile("Data\Loging.jpg")
RE: اضهار صورة في MDIP - alshandodi - 28-06-20
شكرا جزيلا اخي لقد اتعبتك معي ولكن لم ينجح لا اعلم ماهي المشكله
اتمني ان تجد الحل أو من الاخوه الكرام والسموحه والعذر منك
RE: اضهار صورة في MDIP - kiki - 28-06-20
قد يكون الامر بسبب اسم ومسار الصورة غير صحيح
فقط حاول كا تجربة وضع الصورة وليكن فى دريف D
واجعل المسار بهذا الشكل
d:/123.png
كمثال واستخرج البرنامج واذهب وافتح البرنامج من المجلد كا برنامج عادي وليس من المشروع
لاتمام اختبار هل سيعرض الصورة ام لا
RE: اضهار صورة في MDIP - alshandodi - 28-06-20
اشكرك جزيل الشكر اخي kiki على دعمك وتواجدك معاي واشكر جميع الأخوه فكانت المشكله ليس في مكان الصوره المشكله في اعداد لم يكن متوقع
والفنكشن نجح لان في حاله اردت حذف الصوره يمكنني ذلك
يجب أن يكون احدهما مفعل والأخر لا هههههه
[attachment=25149]