منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف اجعل خلفية سطح المكتب خلفية للفورم - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=4483)



كيف اجعل خلفية سطح المكتب خلفية للفورم - aftfm - 26-09-12

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

اريد اجعل خلفية سطح المكتب خلفية للفورم


كيف اجعل خلفية سطح المكتب خلفية للفورم - Sajad - 26-09-12

السلام عليكم اخي العزيز

انظر هذا الرابط

http://www.geekpedia.com/tutorial209_Setting-and-Retrieving-the-Desktop-Wallpaper.html

موفق ان شاءالله


كيف اجعل خلفية سطح المكتب خلفية للفورم - aftfm - 26-09-12

الف شكر اخي العزيز sajad

لكن في هذا المثال استخدم PictureBox وانا اريد ارسال خلفية سطح المكتب مباشرة الى الفورم (BackgroundImage)


كيف اجعل خلفية سطح المكتب خلفية للفورم - amgadtamer - 27-09-12

مرفق مثال يقوم بتغيير خلفية الفورم


كيف اجعل خلفية سطح المكتب خلفية للفورم - amgadtamer - 27-09-12

PHP كود :
المثال سوف يعمل جيدا على xp حيث تمت تجربته لكن على windows7 أو windows8 

يتم تغيير السطر 
fdialo
.FileName key.GetValue("ConvertedWallpaper").ToString

الى 
fdialo
.FileName key.GetValue("Wallpaper").ToString 



كيف اجعل خلفية سطح المكتب خلفية للفورم - aftfm - 27-09-12

الف شكر اخي العزيز amgadtamer

وهذا كود آخر تم التوصل اليه

PHP كود :
Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
        Dim RKey 
Registry.CurrentUser.OpenSubKey("Control Panel\Desktop"False)
        
Me.BackgroundImage Image.FromFile(RKey.GetValue("Wallpaper"))
    
End Sub 



كيف اجعل خلفية سطح المكتب خلفية للفورم - wisamprogramer - 28-09-12

والله مبدعين